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ABSTRACT 


Continuum mechanics solutions are derived for the static load-carrying capacity 
of scarf and stepped-lap adhesive-bonded joints. The analyses account for 
adhesive plasticity and adherend stiffness imbalance and thermal mismatch. The 
scarf joint solutions include a simple algebraic formula which serves as a close 
lower bound, within a small fraction of a per cent of the true answer for most 
practical geometries and materials. The scarf joint solutions are believed to 
be the first such results ever obtained for dissimilar adherends. Digital 
computer programs have been developed and, for the stepped-lap joints, the 
critical adherend and adhesive stresses are computed for each step. The scarf 
joint solutions exhibit grossly different behavior from that for double-lap 
joints for long overlaps inasmuch as that the potential bond shear strength 
continues to increase with indefinitely long overlaps on the scarf joints. The 
stepped-lap joint solutions exhibit some characteristics of both the scarf and 
double-lap joints. The stepped-lap computer program handles arbitrary (differ- 
ent) step lengths and thicknesses and the solutions obtained have clarified 
potentially weak design details and the remedies. Indeed, the program has been 
used effectively to optimize the joint proportions. 
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SYMBOLS 


Aq,..^ = Coefficients of power series for shear stress distribution in 

adhesive layer 

a,c = Extents of plastic stress state in adhesive at ends of bonded 
joint (in.) 

b = Extent of elastic trough in adhesive (in.) 

C,D = Integration constants 

CTHERM = Non-dimensional i zed adherend thermal mismatch coefficient 

d = Length of elastic zone in adhesive bond (in.) 

E = Young's modulus (longitudinal) for adherend (psi) 

ETR = Adherend extensional stiffness ratio 

F = Adherend allowable (or ultimate) stress (psi) 

• • 

G = Adhesive shear modulus for elastic-plastic representation (psi) 
i = Overlap (length of bond) (in.) 

P = Applied direct load on entire joint (lb in. / in.) 

SGNLD = Distinguisher between tensile and compressive shear loads 

T = Direct stress resultants in adherends (lb / in.) 

4T = Temperature change (T operat1 „ g - T cure ) 

t = Thickness of adherend (in.) 

x = Axial (longitudinal) coordinate parallel to direction of load 

a = Coefficient of thermal expansion (/°F) 

y = Adhesive shear strain 

Y e = Elastic adhesive shear strain 

y = Plastic adhesive shear strain 

6 = Axial (longitudinal) displacement of adherend (in.) 

C»£*x = Non-dimensional ized axial coordinates (different origin and/or 

sense from x) 

xi 



n = Thickness of adhesive layer (in.) 
e = Scarf angle (small) (°) 

A = Exponent of elastic shear stress distribution (in. -1 ) 

v = Poisson's ratio for adherend(s) 

x = Adhesive shear stress (psi) 

= Average adhesive shear stress (psi) 

t = Plastic (maximum) adhesive shear stress (psi) 

p 

<j> = x/s, = Non-dimensional ized coordinate 

SUBSCRIPTS 


a,c 


e,P 

i,o 

1,2 


1 ,2 , . .n 


Adhesive (cement) 

Elastic and plastic values 

Inner and outer adherends of symmetric bonded joint 
Different adherends at each end of joint 
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SUMMARY 


It has long been known that bonded scarf joints have a higher efficiency than 
uniform lap joints and that the latter are limited in strength and unsuitable 
for joining thicker sections. What has not been well understood until recent- 
ly is that, in the bonding together of dissimilar adherends in a scarf joint, 
any adherend stiffness imbalance or thermal mismatch imposes a limitation on 
the joint efficiency. As a consequence the adhesive layer is not (essentially) 
uniformly stressed along its length as it is for a scarf joint between identi- 
cal adherends. One objective of this report is to analyze and quantify these 
limitations on efficiency of unbalanced scarf joints. In doing so, adhesive 
plasticity is accounted for by the Douglas elastic-plastic model which has been 
demonstrated to be effective for uniform lap joints. One dominant characteris- 
tic deduced for scarf joints is that for long overlaps, regardless of any ad- 
hesive ductility and/or adherend thermal mismatch, the ratio of the average 
adhesive shear stress to the peak adhesive shear stress is equal to the lower 
ratio (<i) of the adherend extensional stiffnesses. The governing differential 
equations do not possess an explicit solution in terms of standard functions, 
so a series solution was employed. Even so, an algebraic expression was deduced 
for a lower bound which proved to be so close to the more precise solutions that 
it could be employed directly for practically all realistic joint proportions. 
Severe adverse effects of adherend thermal mismatch are confined to a specific 
overlap range. The effects decrease asymptotically to zero for very short or 
very long overlaps. 

Stepped-lap joints represent a cross between scarf joints and uniform lap 
joints. The stepped-lap joint overcomes the upper limit on joint strength of 
uniform lap joints but retains the severe adhesive strain concentration at the 
end of each step. One advantage of stepped-lap joints over scarf joints is 
that the alignment and fit is far less critical when there are joints on more 
than a single interface. Another is that it is more suitable for boron-epoxy 
laminates than is a scarf joint because of the thick brittle filaments. This 
is particularly important for the titanium edge members frequently used in 
conjunction with boron -epoxy panels. Because the graphite fibers are so much 
thinner and more flexible than boron filaments, the former can take advantage 
of the higher efficiency of the scarf joint. 
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Digital computer FORTRAN IV programs are included for the iterative solutions 
necessary for these problems. The scarf joint solutions are in terms of non- 
dimensional i zed parameters. The stepped-lap joint program is dimensional and 
permits each step to be varied independently so as to be able to identify and 
improve the most critical detail (s) of the joint. One key factor in the design 
of stepped-lap joints is that the bond load transfer is concentrated at the 
end of the joint from which the softer (less stiff) adherend extends. Conse- 
quently, it is necessary to restrict the length of the end step of the stiffer 
adherend to prevent it from being overloaded. Another characteristic of 
stepped-lap joints identified by the analyses is that the end three steps of 
the more critical end dominate the internal load distribution and effectively 
determine the load capacity. The steps at the less critical end are found to 
have practically no effect on the load capacity. 
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1. INTRODUCTION 


It is generally recognized that, in the bonding together of thick sections, 
the use of either scarf or stepped-lap joints is mandatory if an acceptable 
structural efficiency is to be realized. References (1) and (2) explain how, 
for uniform lap joints, the maximum possible joint efficiency decreases with 
increasing thickness (extensional stiffness) of the members being bonded 
together. The objective of this report is to apply the elastic-plastic adhesive 
analysis techniques developed in References (1) and (2) to the scarf and stepped- 
lap joints. The approach used remains that of continuum mechanics rather than 
finite elements. The governing differential equations were relatively straight- 
forward to set up but, in most cases, specific closed-form solutions could not 
be derived. Severe numerical accuracy problems had to be overcome in develop- 
ing the FORTRAN IV digital computer programs employed and this phase of the 
work represented by far the bulk of the investigation. The computer programs 
are listed in the Appendices and representative non-dimens ionali zed solutions 
are illustrated to show the effect of the governing scarf joint parameters. 
Specific solutions are presented for stepped-lap joints. 

This scarf joint analysis is concerned with the non-uniform adhesive shear 
stresses necessarily associated with the bonding together of dissimilar adher- 
ends. It is well-known that the stresses are uniform if the adherends are 
identical. It has only recently begun to be appreciated that the adhesive 
shear stresses are markedly non-uniform if the adherends are dissimilar. In- 
deed, the literature contains very few references to this problem. The mech- 
anism whereby these non-uniform stresses are developed is illustrated in 
Figure 1 for the case of thermal mismatch between stiffness-balanced adherends. 
The first publication on scarf joints between dissimilar adherends appears to 
be that of Lubkin [Reference (3)] who, in 1957 sought the particular scarf 
angle associated with uniform adhesive stress for a particular ratio of adher- 
end elastic moduli. He omitted consideration of any adherend thermal dissimi- 
larity. Unfortunately the predictions of his equation [10] are such as to 
indicate the appropriate scarf angle e is so great (typically in excess of 45 
degrees) as to be of no practical interest for bonding aerospace materials 
together. For realistic adhesives and adherend materials, the scarf angle 
should be restricted to less than 4 degrees in order for the potential bond 
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strength to exceed the adherend strength(s). Working independently, in 1971, 
the present author [Reference (4)] and Erdogan and Ratwani [Reference (5)] 
demonstrated by calculation the non-uniform adhesive shear stress associated 
with scarf joints between dissimilar adherends. The former work was based on 
a perfectly-plastic adhesive analysis, while the latter derived from a linearly- 
elastic formulation. Consequently neither afforded a complete solution but 
both demonstrated clearly that the adhesive load transfer is concentrated at 
that end of the joint from which the softer adherend extends. The present 
solution utilizes an elastic-plastic adhesive model with linearly elastic ad- 
herends and accounts for adherend stiffness and thermal imbalances. Eccentric- 
ities in the load path are excluded and, in keeping with common design practice, 
the scarf angle is considered to be so small that adhesive tension (or com- 
pression) stresses may be neglected in comparison with the shear stresses. 

In 1968, an elastic finite-element analysis of scarf joints was performed by 
Richards [see Reference (6)]. Bo ron/epoxy- to-boron/epoxy and boron/epoxy-to- 
aluminum joints were analyzed. Thermal effects were neglected. In the former 
case, relatively small (<k%) stress concentrations were identified in the vi- 
cinity of the ends of the scarf. Their existence had not been demonstrated 
prior to that investigation. In the latter case a markedly non-uniform stress 
distribution was deduced, with significantly more load being transferred to 
and from the 0° plies in the laminate than occurred with the ± 45° plies. 

This is to be expected in view of the much lower modulus of the cross plies. 

While the mathematical complexity of equations governing the scarf joint has 
restricted the number of solutions obtained, a number of investigations of the 
stepped-lap adhesive -bonded joint have been performed. Finite-element elastic 
solutions are reported in References (5) to (9) but none of these include any 
thermal mismatch effects. Reference (10) included adhesive and adherend non- 
linear behavior in the analysis but, for the stepped-lap joint, encountered 
convergence difficulties at high load levels. Grimes, Calcote, Wah, et al 
[Reference (10)] also performed non-linear iterative theoretical analyses of 
double-lap, single-lap and stepped-lap joints which they compared with their 
discrete element analyses, showing good agreement for the first two. They 
also formulated the scarf joint equations (see their Appendix A) in greater 
detail than is done here, but were unable to solve them. Corvelli and Saleme 
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[Reference (11)] developed analysis techniques for bonded joints which included 
analytical solutions for stepped-lap joints, but in a less comprehensive form 
than presented here. 

Past attempts to include non-linear adhesive behavior in the analytical solu- 
tions have centered around the Ramberg-Osgood representation which has a smooth 
continuous characteristic. This has precluded the derivation of any explicit 
closed-form solutions. The present author had earlier derived such solutions 
for double- and single-lap adhesive-bonded joints using an elastic-plastic ad- 
hesive formulation [see References (12) and (13)]. These showed that the ad- 
hesive shear strain energy per unit bond area was the necessary and sufficient 
adhesive characteristic governing the potential bond shear strength. The pre- 
cise shape of the stress-strain curve appeared to be unimportant. This belief 
was further reinforced in Reference (1) by the derivation of precisely the same 
potential bond shear-strength for any arbitrary bi -elastic adhesive character- 
istic having the same strain energy and failure stress and strain. In addition, 
the author's elastic-plastic solution was in good agreement with the discrete 
element solutions by Teodosiadis [Reference (14)], who represented the adhesive 
and interlaminar shear characteristics by six straight segments. The success 
of this elastic-plastic adhesive approach in these simpler problems led to the 
decision to apply the same techniques to the scarf and stepped-lap joints in 
this report. 

The adhesive-bonded stepped-lap joint is of practical interest principally 
because of extensive use in the bonding of boron-epoxy to titanium edge members. 
The boron filaments are too thick ( 0.005 inch), and too hard to machine, to be 
as suitable for the more efficient scarf joints as the very thin graphite fibers 
are. In practice the stepped-lap joint contains a large number of small steps 
and closely approximates the behavior of the equivalent scarf joint. The only 
difference is marked for very brittle (high-temperature) adhesives and is the 
adhesive shear stress (and strain) concentrations at the ends of each step, 
particularly at the outermost steps. It transpired that peel stresses imposed 
more severe limitations for thick double- and single-lap joints than did the 
adhesive shear stresses [see References (1) and (2)]. In actual design prac- 
tice for scarf and stepped-lap joints, the slope is small and the end step is 
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invariably thin so there is no way for severe peel stresses to develop. For 
any unusual stepped-lap joint, with a thick outer end step, the analysis in 
Reference (1) can be employed to assess any potential peel problem. 

This report considers in turn elastic and elastic-plastic analyses of scarf 
and stepped-lap joints and discusses parametric effects and design procedures. 
The digital computer programs prepared from the analyses are recorded in the 
Appendices, along with brief instructions for their use. 
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2. ELASTIC ANALYSIS OF SCARF JOINTS 

Figure 2 depicts the geometry and nomenclature for the analysis of a non- 
eccentric bonded scarf joint. The diagram serves for both the elastic and 
elastic-plastic solutions. In the former case, the plastic adhesive zones 
should be considered removed. That is, set a = c h o and b = «,. The scarf 
angle e is considered so small that cose = l and e = o. In other words, the 
effect of adhesive peel stresses is omitted from consideration. This is quite 
legitimate for the small scarf angles associated with practical aerospace 
materials. 

The conditions of horizontal equilibrium for a differential element dx within 
the joint are 


dTi 


dT 2 


+ T = 0 


- T = 0 


( 1 ) 


dx dx 

The stress-strain relations for the adherend materials, accounting for thermo 
elastic effects, yield 

d&l T! dfi 2 T 2 

dx 


+ a j AT , 


+ a 2 AT 


( 2 ) 


(Et ) ! dx (Et ) 2 

in which the adherend thicknesses, as a function of the axial coordinate x are 


(Et)i = Eit^l-I) , (Et ) 2 = E 2 t 2 (|) . (3) 

The adhesive shear strain is taken to be uniform across the thickness of the 
bond. That is 

Y = (6 2 - 6 1 ) /n . (4) 

The elastic adhesive shear stress follows as 

t = Gy = g( 6 2 - 6i)/n . 

In solving these equations it is desirable to non-dimensional ize the solution 
with respect to the peak adhesive shear stress and the bond overlap. Thus, 
introducing the non-dimensional i zed axial co-ordinate 

<t> = x/SL , 
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a series solution is sought, having the form 


— ■ £*„ * n - 1 • < 7 > 
T p i 

We define the adherend 1 end of the joint as critical so that 

A 1 = 1 , (8) 

if necessary by interchange of the identifying subscripts l and 2. While a 
single non-linear differential equation has been derived from the equations 
above, it cannot be solved directly. This is why a series solution is employed 
here and, in this case, it is more straightforward to work in terms of the 
equations above than the derivative governing equation. 


The solution proceeds from equation (7). Substitution into equation (1) yields, 
for the adherend forces per unit width, 


Ti = t a - t i 
1 av pi 


n , n 
— <P 
n 


t 2 = • 


(9) 


Now equation (5) is differentiated. 

d(x / x) 


d<j) 


x ol 
P 


"d6 2 d&i 

.d<(> d<|> . 


( 10 ) 


Substitution of the series (7) and (9), with the aid of equations (2), leads 
to the solution 


£(n-l)A n + ( ”- 2) 

1 


G£ ( x £ —.A / v 

= < (a 2 - ai ) AT + ~ ^ <(> n_ 

x n ( E 2 t 2 x n 


x £ 
av 


x £ 

. P- 


Ejtid - <(>) Eitid - 


£- + n 

n 


(id 
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Multiplication throughout by (l - <j>) converts the equation directly into a form 
suitable for solution by recurrence relations. 


— . . / 0 \ Gil Gil 2 t 

(1 - $) ^(n-l)A n <(. U_2J = (o 2 - a x )AT(l - <J>) - — 


nE i t 1 T 


[(!-♦) "* , 1 “A 1 

+ * (n - 1> ♦ *" • < 12 > 

n L Eoto n Eiti . n 


In order to give the solution the greatest coverage with the minimum number of 
independent variables, certain non-dimensional parameters are introduced. The 
non-dimensional ized overlap is given by the square root of 


(M ) 2 = 


n LEiti E 2 t 2 J rw LEiti E 2 t 2 


the non-dimensional ized thermal mismatch term is 


CTHERM ( 1 ) = 


X( a 2 - ax ) AT 


(-A- 


ctherm( 2 ) = - ctherm(i) , (14) 


and the adherend stiffness ratio is 

ETR ( 1 ) = Ejti / E 2 t 2 , 


ETR( 2 ) = E 2 t 2 / E x t x . 


It is interesting to note that precisely the same variables govern the double- 
lap joint [see Reference (1)]. Equation (12) then becomes 


E [ ( n-l ) A - (n- 2 )A , ]<j/ n “ 2 ^ = (X$.)*CTHERM(l)x(l - <t>) - 

n n-l 


[l+ ETR(l)] t 


(XH) 2 ETR(l) “ A n .. (XJl) 2 [l - ETR(l)] ” r 

+ <f> n ~ + Z-j— <t> 

[ 1 +ETR( 1 )] ± n [l + ETR(l) ] n n 
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By rearranging the limits of the series it follows that 


^[(n+l)A n+2 - nA n+1 ]<|> n = ( M )xCTHERM(l ) x ( l -<(.)- 


(U) : 


av 


[l+ ETR(l) ] t 


(M) 2 ETR(l) " A n+1 n (X£) 2 [1 -ETR(i)] “ A n q 

[l + ETR(l) ] x n - 1 [ 1 + ETR ( 1 ) ] 1 n 

For large values of n, on setting to zero the coefficient of the term 4> 
the recurrence relation is deduced as 


( 17 ) 


n-2 


A n = (n - 2) Vl + (U)2 


ETR(l) \A /I - ETR(l)\A l) 

— M — / (n - l) . ( 18 ) 

+ ETR(l)/n-l \1 + ETR(l)/n- 2l) 


It remains now to establish the initial conditions by examining the coefficients 
of the <j>° and 41 1 terms. From the coefficient of <|> 0 , 


a 2 = (AJl) CTHERM(l) - (XU) 2 

while, from the coefficient of 

2A 3 - A 2 = - (XI) CTHERM(l) + 


1 

T 

av 

1 + ETR(l). 

T 


+ (XI) 2 


ETR(l) 


.1 + ETR(l)J 


(XSL)‘ 


Ax (19) 


a 2 


[1 - ETR(l)]A! + ETR(l) — J . (20) 


[1 + ETR(l)] 

It follows from equation (19) that, quite generally, for long overlaps (large 
values of xi ) , 


T . 

a 7. -► ETR(l) 1 1 . (interchange 1 and 2 if necessary.) (21) 

T 

P 

This surprisingly simple result proves to dominate the entire behavior of bonded 
scarf joints, even for elastic-plastic adhesives. This equation demonstrates 
conclusively the importance of maintaining adherend stiffness balance whenever 
possible. When this is maintained, in the absence of any thermal mismatch, the 
adhesive is essentially uniformly stressed throughout the entire overlap of any 
length. The only minor exception is the local end effect identified by 
Richards in Reference ( 6 ). 
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Returning now to the solution, in terms of equations (18) to (20), it follows 
by integrating equation (7) that 

oo 

T __ A 

— = 2 ^— . ( 22 ) 
t n n 

P 1 

In using this series it is necessary to employ two arbitrary constants to 
satisfy the boundary conditions. The first two are chosen. That is 

T 

— = A 1 x SIG(3) + A 2 * SIG(U) (23) 

T 

P 

and, because of equation ( 8 ), 

T 

— = SIG(3) + A 2 * SIG(U) . (24) 

T 

P 

The summations sig(3) and sig(U) are the quantities formed by evaluating the 
coefficients in equation ( 22 ) by means of equations ( 20 ) and (18) after set- 
ting, in turn, 

A x = 1 , A 2 = 0 for SIG(3) (25) 

and 

A 1 = 0 , A 2 = 1 for SIG(1+) . (26) 

The solution procedure employed in the FORTRAN IV digital computer program 
listed in Appendix A1 is as follows. The coefficient A 3 for each set of ini- 
tial values (25) and (26) is evaluated in terms of equation (20). Then a 
number of higher order coefficients are evaluated in turn through the recur- 
rence relation (18), the same number being evaluated for sig(3) as for sig(U). 
The results of these summations are then substituted into equation (19) which 
takes on the form 

( (A £) 2 ) (A£) 2 ETR(l) 

A 2 ll + SIG(U)| = (A£) CTHERM(l) + 

( [l + ETR(l ) ] ) [l + ETR(l) ] 

(A £) 2 

- SIG(3) . (27) 

[1 + ETR(l)] 
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The unknown a 2 is then to be evaluated and substituted into equation (19) 
re-arranged in the form 


X 

av 


x 

P 


ETR(l) 


[1 + ETR(l)] CTHERM ( 1 ) 
(X£) 


[ 1 + ETR ( 1 ) ] 

{XI ) 2 


a 2 . 


This equation establishes the potential bond shear strength. 


(28) 


The detailed discussion of parametric effects is presented in Section 5 but 

certain features of the mathematics of the numerical solution merit elaboration 

at this stage. The most important feature is the decision to evaluate the 

terms A /n of the average stress series (22) directly rather than the quan- 
n 

tities A of the series (7). To do so, equation (18) is re-organized to the 

n 

form 



(n-l)(n-2) 


/ A „-A 

I + {XI) 2 

ETR(l) 

1 

(Vi' 

l-raUDMvj 


1 

.1 + ETR ( 1 ) 

Vn-l) 

' 1 + ETR(l) Vn - 2/ 


.(29) 


[n(n - l) ] 


The reason for this is the factor (as.) 2 in equations (29) and (18). Because of 
this, for long overlaps, a much higher value of n is needed to reach negligible 
values of a^ from equation (18) than to reach negligible values of A n /n from 
equation (29). Indeed, even with the use of equation (29) rather than equation 
(18) it remained impossible to compute reliable internal stress distributions 
for long overlap joints, even with as many as 50 terms of the shear stress 
series because of overflow in the computer. Such a computation is of little 
importance, however, since the critical location must be at one end or other 
of the joint. In spite of this problem, however, equation (27) converges 
rapidly, usually within the first five successive evaluations (for progressive- 
ly increasing n) of sig(3) and sig(4). The program in Appendix A1 used 20 
terms. In addition to this, because A 2 is divided by (A£) 2 in equation (28), 
an extremely reliable value of T av / T p can be computed readily. The program 
identifies the more critical end by the simple expedient of estimating the 
strength starting from each end of the joint and selecting the lower value. 

It is obvious that a computation of x &v /x p > l signifies simply that condi- 
tion (8) was violated. A negative value of x /x indicates such severe 
thermal mismatch between adherends that the joint will break apart prior to 
application of any mechanical loads. 
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The computation of joint strength proceeding from the other end of the joint 
is effected by simply interchanging the subscripts 1 and 2 on all affected 
quantities. With regard to adherend stiffness imbalance alone, it is always 
possible to identify from equation (28) that the more critical end (1) is that 
for which etr(i) 5 l. The possible ambiguity arises as the result of the 
thermal mismatch terms. Since ctherm(i) may be either negative or positive 
independently of whether ETR(l) is less than or greater than unity, severe 
thermal mismatch may nullify or even overpower any stiffness imbalance effects. 
This possibility is evidently greatest for short overlaps because of the factor 
(Xfc) in the denominator of the thermal term in equation (28). It follows that 
the critical end of the joint between given adherends may well change as the 
overlap changes and, indeed, such behavior was predicted by the computer 
program output. 

Equations (1) and (2) have been set up for applied tensile loads in the ad- 
herends. In the event that the applied load is compressive, it can be seen 
with reference to Figure 2 that all quantities except the thermal strain terms 
will change sign. This implies that, in the absence of any thermal mismatch 
effects, the same end of the joint is critical for both tensile and compressive 
adherend loads and that the joint strength is the same. Rather than change the 
sign of all quantities with the exception of the thermal terms, the program 
merely changes the signs of ctherm(i) and ctherm(2) to account for compressive 
loading rather than tensile loading. It should be noted that, as a consequence, 
the opposite end of the same joint may be critical for a reversed load and that 
the strength may not be the same if there is also stiffness imbalance between 
the adherends. Likewise, just as for double-lap joints, if the thermal mis- 
match terms nullify any stiffness imbalance effects for one load direction, 
they must aggravate the stress concentrations for a load in the reverse direc- 
tion. By analogy with the double-lap joint analyses in Reference (1), the 
case of in-plane shear loading is covered by the analysis above replacing e x 
and e 2 in equation (2) and those equations based on it by the shear moduli Gi 
and g 2 and neglecting the thermal affects which induce bond stresses at right 
angles to those of concern for mechanical in-plane shear loads except at the 
sides of the joint. The direct adherend forces t x and t 2 are replaced by shear 
forces Si and s 2 per unit length. A more precise representation of thermal 
effects for in-plane shear loading would necessarily require a two-dimensional 


13 



analysis rather than the one-dimensional solution above and the justification 
for doing so is minimized by the small amount of adhesive plasticity that even 
the real brittle adhesives exhibit. 
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3. ELASTIC-PLASTIC ANALYSIS OF SCARF JOINTS 


The preceding elastic analysis covers essentially the most difficult formula- 
tive portions of the elastic-plastic scarf joint analysis. New numerical 
difficulties of major proportions were encountered in the generation of speci- 
fic answers by the computer program, but the plastic part of the analysis is 
straightforward. The necessary additional geometry and nomenclature are iden- 
tified in Figure 2. Equations (1), (2) and (4) continue to apply, with the 
substitutions 


dx = l d£ = ft dx = ft dc ( 30 ) 

as appropriate. Equation (5) is supplemented by the relation 

x = Tp for 0 i 5 1 a and 0 1 ? £ c (31) 

The relations (4) for the adherend stiffnesses are replaced by 

(Et)i = Ejtid - ?) = Eitx(l - J - X ) = E ltl (l - | - | - ?) (32) 

and 

(Et) 2 = E 2 t 2 5 = E 2 t 2 (|+x) = E 2 t 2 (| + j+e) . (33) 

In the elastic zone, the location of which has yet to be determined, the same 
power series solution is sought: 


- XX 


(n-l) 


or 


- ■ XX* 

y - 1 


(n-l) 


(34) 


again with Ai = l by definition of adherend l as the more highly loaded end of 
the joint. 


In the left adhesive plastic zone of the joint illustrated in Figure 2, the 
adherend forces per unit width follow from equations (1) and (31) as 

T 1 = x ft - T A? and T 2 = x ft? . (35) 

tx v p p 
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Substitution into equation (4), making use of equations (2), yields 

l 


Y = 


6 2 - <5 1 


n 


T 2 £dC 

r Ti£dC‘ 

(a 2 - aj)AT£C + / 

J q (Et ) 2 j 

' 0 (Et)i. 


Y = 


t £ 2 

(<x 2 - a^ATtC + — 5 + 

E 2 t 2 


(x - t ) 

I __E 

' n (Eiti)(l- 


)£ 2 x £ 2 

-a? 

5) Ejti 


+ C 


( 36 ) 


(37) 


y = — (012 - cti)AT££; + x £ 2 

n p 


(t - T )i 


5 - 


av 


LE 2 t 2 

The appropriate boundary conditions are that 

at C = o 


Ejti 


and 


Y = Y + Y 
' ' e p 


Y = Y, 


£n(l - Z) + C . (38) 


(39) 


at Z = a/ £ . 


Consequently, from equations (39) and (38), 


G - (Y e + Y p ) 


so that, from equations (40) and (38), 


Y P = " 


(ot2 - )AT£| — J + t l 


*' 2 1± 


\E 2 t 2 



(t - t )£ 2 
p av 

Eit! 


£n 


f--) 

\ V 


(40) 


(41) 


.(42) 


Equation (42) may be non-dimens ionali zed by use of the quantities in equations 
(13) to (15). It then adopts the form 

^a\ /a\l-ETR(l) [1 -(t /t ) ] 


(?)•- 


(A£) CTHERM(l)(-) + ( X£ ) 2 ( — ) + (A£) 2 - 

£/ \ £ / 1 + ETR ( 1 ) 


av P 


-£n 


[1+ ETR(l)] 


K) 


£ 1 

(43) 


In solving for the joint strength it is necessary to maintain continuity at 
the transition (z = a/£) from plastic to elastic adhesive behavior. The con- 
tinuity of adherend stresses requires that there be no change in dy/dx. 

From equations (4) and (2) 

i| t 2 

- (a 2 - aj)AT + | (44) 


dy 

dx 


(Et) 2 (Et)i 
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or, in non-dimensionalized form, for the plastic side of the transition 


a(Y/Y e ) 


1- ETR(l) (AH) 2 [l - (t /t ) ] 

= (AH) CTHERM(l) - (At) 2 + ■ 2 


5 =a/H 


1 + ETR(l ) [1 + ETR ( 1 ) ] [ 1 - (a/H ) ] 

(45) 


For the elastic side, equation (34) requires that 

= a 2 . 


<i(y/y ) 

e 


dx 


(46) 


X = o 


Since Aj e 1, the elastic stress distribution can now be evaluated by a recur- 
rence formula, just as in Section 2. 


Under certain combinations of stiffness and thermal mismatch between adherends 

there will be no second plastic adhesive shear stress zone at the far end of 

the joint while under others there will be. In the former case, the evaluation 

of the elastic adhesive shear stress at x = 1 - (a/H) by means of the series 

(34) will lead to a result x ,/t 5 i. A value of this ratio greater than 

end p 

unity indicates a need for evaluating the affects of the presence of a second 
plastic adhesive zone, at the far end of the joint. Referring again to Figure 
2, the adherend forces per unit width are evaluated through equations (1) and 
(31) as 


T > ■ • t 2 ■ T a/ - V ( r- ?) ■ (47) 

Substitution of equations (47) and (33) into equation (44) leads to the expres- 
sion 


d(y/Y e ) 


T 1* 


(a 2 - oi )ATH - -E- 


T H 2 (t - X )l‘ 

P E 


d£ x p n E^t^ E 2 t 2 (E 2 t 2 )[l — ~+ ?] 

The transition relation at z = o follows as 

fl- ETR(l) 


(48) 


d(y/Y e ) 


dY 


= (A H) CTHERM(l) - (A®.) 2 


Z =0 


1 + ETR(l) 


[1- (x /x )]ETR(1) 

- (AH) 2 — 

[1 + ETR(1)](1 - j) 


(49) 
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Equation (48) may be integrated once, yielding 

/ Y \ l-ETR(l) 

— = (AA) CTHEHM(l) ? - (XU) 2 £ - 

'Y e ' 1 + ETR ( 1 ) 


[1 - (t /t )]ETR(l) 

- (XI) 2 $$— 2 An(l - j + c) + C 

[1 + ETR(l)) 


in which, since 


(50) 


Y = Y, 


at c = o 


[1 - (t /t ))ETR(1) 
1 = - (XU) 2 


An(l- j) + C . 


[1 + ETR(l)] 

Signifying by Y the peak adhesive shear strain at the less critical (by 

2H£LX 

definition) right hand end of the joint. 


(51) 

(52) 


(?) 


max 


= (AA) CTHERM(l)(-| - (AA) 2 


1 - ETR(l) 


1 + ETR(l) 


0 


[1 - (x J t ) ] ETR ( 1 ) 

+ (AA) 2 $2—2 

[1 + ETR(l)] 


An 


dr) 


(53) 


A comparison of equations (43) and (53) shows complete consistency upon inter- 
changing subscripts l and 2. While equation (53) could be employed to identify 
whether the left or right hand end of the joint in Figure 2 is more critical 
once the extent of the second plastic zone (c/a) had been established, there is 
an inherent numerical difficulty in the step by step computation of the strength 
by the procedure outlined above. It was explained in Section 2 that, for the 
perfectly-elastic adhesive, only the average adhesive shear stress could be 
computed and not the stress distribution as a function of position along the 
joint. In the computer program in Appendix A3, the only reason why it proved 
possible to evaluate the extent of the elastic trough, for long overlaps, was 
the factor [i-(a/A)-(c/A) ] n_1 < l in equation (34). At high values of n, this 
very small term was able to overpower the influence of the (aa) 2 factor in the 
numerator of the recurrence formula (18). This numerical accuracy problem 
prevented the reliable evaluation of d(y/ Ye )/dx at x = (b/A) to match boundary 
conditions at the transition of the second plastic adhesive zone. Consequently 
an iterative solution had to be employed to evaluate the maximum possible 
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extent of the elastic trough. 


Referring to equations (45) and (46), it can be seen that, in the iterative 
solution process, the second term of the elastic adhesive shear stress series 
a 2 depends on the preceeding estimates of both (a/t) and (t /t ). In the 

<3. v 

early development of the digital computer program for elastic-plastic scarf 
joints insurmountable convergence difficulties were encountered if the initial 
estimates for ( T av / T p ) and (a/t) were not sufficiently close to the true values. 
This difficulty was eventually overcome by the following technique. Equation 
(43) was re-arranged to read 


fc) 


[1 + ETR(1)]/y t 

(At) 2 \Y, 


[i + etr(i)]ctherm(i) 
(a*) 


- [1 - ETR(l)] 



= 1 - 


tn[l- (a/t) ] 


.(54) 


This can be differentiated with respect to (a/*.) so that 


d(x /t ) / d(a/t) = o when 
av p 



| [ 1 + ETR ( 1 ) ] ^Yp ^ 

"[1+ ETR(l)]CTHERM(l) 

- _ f 1 T?HTR ( 1 ) 1 

(l)\ 

( (At) 2 \ Ye / + 

L .L Lin v -L / J 

(At) 

\£/ j 

[1 + ETR ( 1 ) ] CTHERM ( 1 ) 

[1 - ETR(l)] - 

(At) 

(55) 


Substitution of equation (55) into equation (54) yields, for the minimum 

(stationary) value of (t /t ) 

J av p 

T [1 + ETR(l) ] ctherm(i) 

-Si = ETR(l) + 

x ( At ) 

P 


a ( [l + ETR(l)]CTHERM(l) 

+ — < [l - ETR(l)] - — 

t ( (At) 

This is evidently consistent with the elastic solution (a/t) = 0 for large 
overlaps and, upon subsequent comparison with the more precisely estimated 
joint strengths, proved to be an extremely close lower bound for all cases of 
practical interest. It is significantly conservative only for very short over- 
laps [small values of ( A£ ) ] or very brittle adhesives [very small values of 
(y /y )]• The adhesive shear strain capacity y is involved in equation 

P 6 P 

(56) implicitly through the extent (a/t) of the plastic zone. Equation (55) 
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is solved by iteration to evaluate (a/t) and the result substituted into 
equation (56) or (54). Appendix A2 contains a listing of the FORTRAN iy 
digital computer program employed to solve equations (55) and (54), together 
with sample outputs and brief user instructions. The iteration technique 
eventually adopted proved to be quite convergent, after other re-arrangements 
of equation (55) demonstrated strongly divergent characteristics. 

This program in Appendix A2 served to provide the initial estimates of (a/O 

and (t /t ) in the more precise solution listed in Appendix A3. The sequence 

av p 

of variables used in the solution is (a/O, ( T av / T p ) an< * ( C / A ) after which 
(x /t ) is recomputed and the estimate of (a/O adjusted until convergence is 

8.V P 

attained. In those cases in which the critical end is not evident by inspec- 
tion, the potential bond shear strength is computed from each end of the joint 
and the lower value adopted. Brief user instructions and sample outputs are 
included in Appendix A3. 

The analyses above for scarf joints pertain to adhesive shear stresses and it 
is demonstrated that a small enough scarf angle can always be found to transfer 
the full adherend strength through the bond with an adequate margin. There is, 
of course, a potential problem with the adherend strength (s) if the scarf angle 
is too small. Specifically, one adherend will fail if the scarf angle e is so 
small that 

6 < T p /F u , (57) 

(where F is the ultimate adherend stress in tension, compression, or shear, 

U 

as appropriate) at the more critical end of the joint (identified by the ad- 
hesive shear stress analysis). Should this situation arise, the solution is 
to decrease the adherend stiffness imbalance across the joint by local rein- 
forcement of the softer adherend. It is evident from equation (17) that this 
potential problem of breaking off the tip of (usually) the stiffer adherend 
is more likely to arise with the brittle adhesives (higher values of peak 
adhesive shear stress x p ) than with ductile adhesives. This is one important 
reason for preferring to effect the load transfer with a shorter overlap of 
ductile adhesive than with a longer overlap of brittle adhesive. The extreme 
case of making the overlap so extremely long that the peak adhesive shear 
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stress actually developed is restricted to a small fraction of its capacity 
when adherend failure occurs outside the joint has theoretical appeal only, 
frequently being quite impractical. 


21 



4. DISCUSSION OF PARAMETRIC EFFECTS 

Representative solutions from Sections 2 and 3 for unbalanced bonded scarf 
joints are illustrated in Figures 3 through 7. Figures 3 and 4 show the sep- 
arate effects of adherend stiffness and thermal mismatch, respectively, on the 
elastic joint strength. The deviations from unity in the ( T av / T p ) ratio, for 
a given overlap (X£), are proportional to the individual imbalances. The 
effect of stiffness imbalance is a smooth decrease from a fully-efficient bond 
(t = x ) to a less efficient bond (x < x ) asymptoting towards the solution 
given in equation (21). This diagram, more than any other, characterizes the 
dominant feature of the scarf joint behavior. This is that the potential bond 
strength continues to increase indefinitely with increasing overlap. This is 
in marked contrast to the behavior of uniform lap joints [References (1) and 
(2)], which develop maximum strengths which remain effectively constant beyond 
intermediate overlaps. The effect of this characteristic on the potential bond 
strength of scarf joints is that, by making the scarf angle sufficiently small, 
one can always design a joint in which the potential bond strength exceeds the 
adherend strength by any specified factor. This is amply demonstrated by curve 
D in Figure 4. While adherend stiffness and thermal mismatch combine to decrease 
the bond efficiency below the unit value of curve A, the bond strength for long 
overlaps ends up being proportional to the overlap. As a consequence of this 
characteristic, the elastic adhesive shear stresses play a far more important 
role in the strength of scarf joints than they do in the case of uniform lap 
joints. Nevertheless, it would be erroneous to conclude that one could always 
design an unbalanced scarf joint within the capabilities of an elastic adhesive. 
The limiting problem is that, as the scarf angle becomes very small, there is 
a strong probability of breaking off the tip of the stiffer adherend. While 
not as acute a design detail problem as its counterpart for stepped-lap joints, 
this feature restricts the scarf angle to exceed the value 

6 = ARCTAN(x p /F u ) (58) 

in which F y is the adherend ultimate strength (in tension, compression, or 
shear, as appropriate for the applied load). 

The effect of adherend thermal mismatch on the potential bond strength of 
scarf joints is shown in Figure 4. It is clear that the effects are insigni- 
ficant for very short and very long overlaps, being significant only for those 
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overlaps of practical interest. The effects are maximum at (M) = 2 for all 
values of the thermal mismatch coefficient CTHERM. 

Figure 5 shows the interaction between adherend stiffness and thermal mismatch. 
Curves B, D and E represent one set of solutions, with curve B showing the ef- 
fect of stiffness imbalance alone. Curve D adds the influence of compounding 
thermal mismatch as well. Curve E demonstrates the behavior of self-cancelling 
adherend imbalances at (ax,) = 3 . For values of (ax.) less than 3, the thermal 
mismatch effects dominate over those arising from stiffness mismatch and the 
more critical end of the joint is reversed. Curves A, C and F form another set 
showing how, for severe adherend thermal mismatch, there is a range of overlaps 
for which the residual thermal stresses are so severe that the joint will split 
apart without the application of any mechanical loads. Quite unlike the behav- 
ior of uniform lap joints [References (1) and (2)], this problem can be elimi- 
nated completely by sufficient extension of the overlap. 

Just as is the case for uniform lap joints adhesive plasticity can increase 
the potential bond shear strength. The extent of this strength increase is 
shown in Figures 6 and 7 for stiffness and thermal mismatch, respectively. 

For each amount of adhesive plastic shear strain, there is an associated over- 
lap below which the bond can be uniformly stressed. For indefinitely large 
overlaps the asymptotic solution (21) again holds, masking completely the in- 
fluence of any adhesive plasticity. In the overlaps of practical interest, 
the actual amount of adhesive plasticity available from real structural adhe- 
sives can improve the potential joint strength greatly. One benefit of using 
a ductile adhesive of moderately high peak shear stress rather than a brittle 
adhesive of very high peak shear stress is that the joint is better able to 
withstand the variation in joint load which inevitably occurs as the result of 
manufacturing imperfections and non-uniform load distribution. Another benefit 
is that the problem of breaking off the tip of the adherend at the more criti- 
cally loaded end [see equation (58)] is greatly alleviated. If the tip of the 
stronger adherend were allowed to be broken off, this would impose an effective 
net area loss on the cross-section of the weaker adherend. 
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5. ELASTIC ANALYSIS OF STEPPED-LAP JOINTS 


The analysis for the strength of stepped-lap adhesive-bonded joints contains 
features of both the uniform lap joints [References (1) and (2)] and the scarf 
joint above. Peel stress problems are ignored on the grounds that the outer- 
most end steps are invariably thin enough (in good design practice) not to in- 
duce significant peel stresses in the adhesive. Likewise, the small eccentri- 
city in the load path has been ignored in the interests of obtaining a useful 
uncomplicated design tool. 

A representative idealized stepped-lap joint is shown in Figure 8, along with 
the sign convention and nomenclature necessary for the analysis. Just as for 
the scarf joint analysis, the same diagram serves also for the elastic-plastic 
analysis, so it contains information not necessary for the elastic analysis. 
This begins with the equilibrium equations for a differential element of one 
of the steps. 


dT dT. 

— — + 2t = 0 , — - - 2x = 0 . (59) 

dx dx 

Here the subscripts o and i refer to the "outer" and "inner" adherends, res- 
pectively, and the factors 2 in equations (59) account for the two bond surfaces 
surrounding the inner adherend. Consequently the adherend thicknesses t and 
t. refer to the total cross-section and the forces t and t. do likewise. The 

1 O 1 

nature of the solution is such that it is, on occasions, necessary to inter- 
change the subscripts o and i mathematically. The thermo-elastic relations 
for the adherends are 

d6 T d<$ . T . 

— = — + V 11 • — = — + V® • (60) 

dx E t dx E.t . 

O O 11 

The adhesive shear strain, for tensile lap shear loading, is 

Y = (6. - 6 o ) / n . (61) 

while the elastic adhesive shear stress is related to the shear strain by the 
relation 

t = Gy = G(6 - <5 Q )/n . (62) 
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The solution proceeds just as in Reference (1). 

T. T 
1 o 


dx 

G 

~d6. 

i 

d6 

o 

G 

dx 

n 

dx 

dx 

n 


+ (a. - 


E.t. E t 
-11 o o 


)AT I 


d 2 x 


2 2 


,E.t. E t 
L 1 l o o- 


T = A 2 T 


dx z n | 

The solution of equation (64) is 

t = A cosh(Ax) + B sinh(Ax) 


(63) 

(64) 


(65) 


where the integration constants A and b are to be determined by boundary con- 
ditions for each step. Substitution of equation into equation (59) yields 


and 


T = T - 2 7- sinh(Ax) - 2 7- [cosh(Ax) - l] 

0 O n A A 

ref 

T. = T. + 2 — ■ sinh(Ax) + 2 7 [cosh(Ax) - l] 

1 1 „ A A 


( 66 ) 


(67) 


The values of t and t. depend upon the origin of x adopted. In the 

°ref 1 ref 

solution it proves convenient to adopt the start of each step as the origin for 
that step. Integrating again, by means of equations (69), 


6 

o 


1 



+ a ATx + 
o 


E t 
o o 


A B 

T x - 2 — cosh(Ax) - 2 — [sinh(Ax)- (Ax)] 
°ref A 2 A 2 


( 68 ) 


and 

6. 

l 


1 


6 . + a . ATx + 

1 ref 1 E.t. 

l l 


A B 

T x + 2 — cosh (Ax) + 2 — [sinh(Ax)- (Ax)] 
x ref A 2 A 2 


. (69) 


In the FORTRAN IV digital computer program, listed in Appendix A4, used to 
solve the equations above for the elastic stepped-lap joint, the technique of 
solution is as follows. The solution proceeds, one joint step at a time start- 
ing with assumed values of the load and initial adhesive shear strain (or 
stress). The latter is set at the maximum adhesive allowable and remains so 
unless it is computed that the peak adhesive shear strain is greater elsewhere 
(most probably at the other end of the joint) in which case the initial strain 
is reduced as much as necessary to avoid exceeding the allowable. The key 
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equation in the solution is equation (65). The integration constant a is 
evaluated as the specified (or subsequently computed) adhesive shear stress 
at the start of the step under consideration. 


A = 


x = 0 

The other constant B derives from equation (63), also evaluated at the start 
of that step. That is 


( 70 ) 


dT 

— = AX sinh(Xx) + BX cosh(Xx) = 

dx 

so that at x = o 


T. 

l 


E.t. 

- i l 


E t 
o o 


(a. - a ) AT 
l o 


(71) 


B = — 


G 

r t. 

T 


1 

o 


E.t . E t 

l i o o 


+ (a. - a )AT 
i o 


(72) 


The values of t, t 


T. , 6 
1 o 


Jx = 0 

and 6. at the end of that step then follow from 
equations (65), (66), (67), (68), (69) and (62), respectively. If, after one 
complete set of computations, the load computed to be transferred out of the 
far end of the joint does not match that assumed to act at the near (starting) 
end, the initial estimate is adjusted until the two quantities do match. At 
that stage, a check is made throughout the joint, step by step, to identify 
the most critical adhesive and adherend locations. If any negative margins 
are identified, the load and peak adhesive shear stress are reduced as much as 
is necessary to eliminate them. 


While the formulation of the equations and analysis scheme above is quite 
straightforward, the actual numerical solution of the problem proved to be 
quite difficult. Even with double precision it was almost invariably impossi- 
ble to compute values for all steps of the joint in a single pass, even if the 
initial conditions (load and peak adhesive shear stress) were precisely correct 
to 16 significant figures. A change of 1 in the 16th significant digit of an 
initial condition would frequently effect a change by a factor of up to ±io 7 
in a quantity computed in the fourth or fifth step. This was not the result 
of a poorly conditioned mathematical formulation. It follows directly from 
strong physical characteristics of stepped-lap joints. It is the nature of 
stepped-lap joints, be they bonded or bolted, that any non-uniformities in 
the load transfer are dominated by the geometry and materials of the end three 
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steps. What happens in between has only negligible effect on the critical 
loads which almost invariably occur at one end or other of the joint. Like- 
wise, in a uniform lap joint, practically all the load is transferred through 
the end three (rows of) bolts or through a narrow effective end zone of adhe- 
sive. Because of this characteristic the initial coding of the equations led 
to a highly accurate estimate of the load (assuming that the adhesive was 
critical at one end of the joint) but was unable to compute the internal loads 
and check on the adherend strength margin. The technique finally employed for 
dealing with this problem took advantage of the seemingly undesirable charac- 
teristics and is summarized as follows. By printing out intermediate computa- 
tions it became clear that, if the initial load estimate on a given step was 
too high (even if only minutely), on the step just before computations for a 
subsequent step caused overflows and underflows in the computer the computa- 
tions would diverge in a characteristic way, precisely the opposite of that for 
an initial underestimate of that load. Therefore upper and lower bounds were 
placed on the load estimate and the trial load was taken as the average of 
these. If the trial load was found to be too high, it served as the new upper 
bound and, were it too low, it was used to raise the lower bound. This tech- 
nique was found to bring the upper and lower bounds into precise agreement 
rapidly. Once this had occurred the computations for the start of that step 
were frozen and the solution proceeded to perturb each successive step in turn, 
using the same convergence check above, until the load transferred out of the 
far end of the joint precisely equalled that input at the near end. Then a 
check is made, at the ends of each step, on the adhesive and adherend stresses 
to ensure that neither exceeds the allowable. Due allowance is made for the 
sign of the quantities involved. In the absence of any thermal mismatch this 
last operation of checking on the allowables can be performed by simple linear 
scaling. However, if there is any adherend thermal mismatch present, this 
adjustment must be performed by iteration since, as is evident from equation 
(62), the thermal stress terms do not scale in proportion to the adhesive and 
adherend stresses. A necessary check on the accuracy of the numerical process- 
es has been accomplished by checking that precisely the same solution is 
obtained regardless of whether the computations commence at the more critically 
loaded end of the joint or at the other end. 
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In view of the numerical problems encountered with this analytical solution, 
it stands to reason that they will have their counterpart in any finite-element 
solution. Very fine grids would be needed in the high stress gradient areas. 
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6. ELASTIC-PLASTIC ANALYSIS OF STEPPED-LAP JOINTS 


In addition to the equations of Section 5 for the perfectly elastic analysis 
of stepped-lap joints, the elastic-plastic analysis requires, instead of 
equation (62), that 


T = t 


for Y t 


(73) 


and 


t = Gy 


for y - Y 


(74) 


The elastic-plastic solution is best carried out in terms of the adhesive shear 
strains rather than the shear stresses. In the plastic adhesive zones, from 
equations (61) and (60), 
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whence, from equations (59) 
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dx 2 n 

Therefore, in the plastic zone, 
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Y = — t x z + Cx + D 
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(75) 


(76) 


(77) 


and 


while 
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(78) 
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In equation (77), d is set equal to y at the start of any step, since a new 
zero for x is chosen at that location for each step. The other constant c 
follows from equations (75) and (77). Thus 


dy 

1 

T. T 

c = — 

= — 

— — - — — + (a. - a )AT 

dx 

X 

II 

o 

E.t. E t 1 ° 

L 1 1 o o J 


(80) 


Very few individual steps of stepped-lap joints have fully-plastic adhesive 
throughout the entire joint. Any adhesive plasticity is frequently confined 
to the end(s) of the step(s). Therefore, in performing an elastic-plastic 
analysis of a stepped-lap joint, it is necessary to be able to compute the 
extent of the plastic zones. Therefore, beginning at the left hand end of 
the step element shown in Figure 8 and assuming a sufficiently high load in- 
tensity for the adhesive to be in the plastic state, the first computation is 
that of the maximum possible extent of the plastic zone. This is then com- 
pared with the actual extent of the step. If necessary, a second computation 
is performed of the maximum possible extent of the elastic trough in that same 
step. Starting from equation (77) with y = y^ ef at x = o. 


Y 



+ Cx + y 


ref 


(81) 


where the constant c is given by equation (80). It is necessary to find the 
lesser value of x for which y = y . Equation (81) is re-arranged to read 


X 2 x 

£ 

2G 



+ Cx 

P 


(y 


ref 



0 


(82) 


so that the maximum extent of plastic adhesive zone is given by 

* P - - c - V ° 2 - “Vw - • < 83 > 

Now, since c = dy/dx < o at x = o the minus sign in front of the radical holds. 
Once Xp has been computed, it is compared with the step length fc gt . If Xp 
> £ step > that particular step is fully-plastic throughout and the values of the 
various quantities at the far end of the step are evaluated from equations (73) 
to (80). Should Xp be less than ^ step > the difference is examined elastically, 
to see whether it remains elastic throughout or becomes plastic again at the 
far end. For Xp < «. g , the values of the various stresses, strains. 
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displacements and forces are evaluated in terms of equations (73) to (79) and 
the subscripts pe serve to identify the plastic-to-elastic transition. Like- 
wise ep identifies the possible elastic-to-plastic transition at the far end 
of the joint. It is necessary that dy/dx be maintained at these transitions, 
as is evident from equation (75). The maximum possible extent of elastic 
trough must be deduced from equation (65). In doing so, it is mathematically 
far simpler to shift the x origin to the middle of the elastic trough (of 

extent 2x ) so that 

e 

t = T_pCosh(Ax) / cosh(Ax e ) (84) 

At the pe transition (x = -x ) equation (62) requires that 

dx Gf T. T 

_ _ 1 o 

dx n E. t . E t 
11 o o 

so that the elastic trough could extend, if ^ step were great enough, a distance 


(a^ - a Q )AT = - x^A tanh(Ax e ) (85) 

pe 


_l ( 1 f T ' 

2Ax = tanh < — 

6 ( Any E.t. 

e l l 

By use of known formulas for hyperbolic functions in terms of exporentials and 
the interrelation between exponential and logarithmic functions, the solution 
(85) is more conveniently expressed as 




In the event that x g does not extend beyond the far (right hand) end of the 
step being analyzed, it is necessary to compute the load transferred between 
the adherends throughout the elastic trough. In doing so, it is quite simple 
to take the value of 2x g from equation (87) and substitute it back into equa- 
tions (65) to (72) for the standard elastic analysis of the preceding section. 
Should the elastic trough not extend to the far end of the step under analysis, 
equations (73) to (80) are employed for the plastic zone to the end of the 
step. 
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Equation (77) now becomes 
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with 


T = T 


for x > x 


P ep 

The constant c in equation (88) is evaluated in terms of equation (75) 

dy 
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In the last steps of the joint at the far end, the adhesive may be fully plas- 
tic throughout in which case, in equation (87), Y should be replaced by 
y . Likewise, in those steps, near the middle of the joint, in which the 
adhesive shear strains are so small as not to reach the plastic state at either 
end of the step, the step will be elastic throughout and equations (65) to (72) 
are employed in the analysis. Towards the far end of the joint there may be a 
step which starts elastically and becomes plastic. In this case the actual ex- 
tent of elastic behavior is determined by iteration, using equations (65) to 
(72) with a cut off (either positive or negative) on the shear stress. 


If it should transpire that, at the end of the step, y exceeds (y g + y ) or 
t or T q exceed their respective allowables, this does not cause any analytical 
difficulty. An iterative procedure is employed in the analysis to reduce the 
external load and initial adhesive strain whenever necessary. While this does 
not represent any analytical difficulty, one should recognize that exceeding 
the allowables on an inner step can occur only as the result of poor detail 
design. The improvement of such details can increase the potential joint 
strength. 


No new numerical difficulties were encountered in the program listed in 
Appendix A5 for the elastic-plastic analysis of stepped-lap joints which did 
not have a direct counterpart in the perfectly elastic analysis. However, the 
logic associated with keeping track of the locations of the transitions between 
elastic and plastic adhesive behavior, and vice versa, as they moved with each 
successive iteration posed a formidable problem. One small computational 
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problem was that, if the load estimate at some early stage in the iteration 
sequence was too far removed from the correct value, the computer would pre- 
dict physically unrealizable large negative shear strains in the adhesive. A 
special set of instructions was prepared for this quirk. 

The computer program, as basically written, checks simultaneously for the 
allowable adherend and adhesive strengths at the most critical locations in 
each step. Since stepped-lap joints are frequently more critical in the ad- 
herend than in the adhesive, a special feature has been added to increase 
greatly all adherend strengths artificially in order to print out also the 
potential adhesive bond strength and confirm that it exceeds the adherend 
strength by an adequate margin. 

The analysis above is presented for the case of tensile lap shear loads being 
positive and the sign convention is in accordance. The computer programs have 
been so coded that, by a single input for the variable SGNLD, the respective 
solutions for tensile shear loading (SGNLD = +1 ) and compressive shear loading 
(SGNLD = -1) can be printed out. In the event that there are simultaneous 
stiffness and thermal mismatches between the adherends, the joint strength will 
not be the same for each load sense. Such a situation is common in the bonding 
of titanium edge members to boron-epoxy panels. 
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7. DISCUSSION OF DESIGN OF STEPPED-LAP JOINTS 

The digital computer programs developed above to analyze stepped-lap joints 
can serve also as a useful design tool. Three clear dominant joint character- 
istics have been confirmed by studies with this program. The first is that 
the joint load capacity is defined by the end three steps at the more cntica 
end of the joint. If other steps have a significant influence it will be ad- 
verse and be due to poor design detailing. The second is that, once the joint 
is essentially well-designed, quite major changes can be made to other than he 
critical end three steps without any significant impact on the joint strengt 
Third is that, in a well-designed joint, it is the very end step that is like- 
ly to precipitate joint failure unless its length is restricted in the design 
process. The necessary restriction is that the product of maximum adhesive 
shear stress and total bond area on the end step must not exceed the product 
of adherend material allowable and, cross section of the end step. Consequent- 
ly, a ductile adhesive with higher strain energy provides stronger joints than 
a brittle adhesive with higher peak stress but less strain energy. It should 
be noted also that minimizing adherend stiffness imbalance increases the poten- 

tial bond shear strength. 


Mathematically speaking, the stepped-lap family of joints represent perturba- 
tions about the scarf joint solution. These perturbations become progressively 
greater as the number of steps decreases until the stepped-lap solution reduces 
to a single-lap joint for one step. Stepped-lap joints with only two or three 
steps are usually confined to thin adherends for which the potential bond shear 
strength is far in excess of the adherend(s) strength. In such cases the added 
strain concentrations in the bond due to the step discontinuities are not very 
important. Most applications of stepped-lap joints contain a large number of 
steps and, with a ductile adhesive softening the most severe of the adhesive 
stress spikes, the behavior very closely approaches that of the scarf joint. 

For this reason, preliminary design of practical stepped-lap joints by means 
of the scarf joint solution appears to be quite realistic. In doing so, how- 
ever, one should exercise caution with regard to the critical end step of the 
adherend. The stepped-lap joint analysis, and practical experience, have iden- 
tified the end step of the stiffer adherend as a prime candidate for the most 
critical design detail. If the extension^ modulus of a composite adherend is 
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significantly less than that of a metal adherend to which it is bonded, most 
of the shear load transfer will be concentrated at the composite end of the 
joint with the probable result that tip fracture of the stlffer adherend will 
occur. One simple remedy to this potential difficulty is to be found in the 
concept of the dual -slope scarf joint illustrated in the upper part of Figure 
9. In this joint, in order to protect the tip of the adherend, the scarf 
angle e x is set to exceed 


01 . = T / F 

min p u 


(91) 


in which x p is the peak adhesive shear stress and F u is the appropriate adher- 
end allowable stress in tension, compression, or shear as dictated by the 
nature of the applied load. The next step in the preliminary design process 
is to estimate the total scarf length necessary to effect the transfer of the 
entire load p. A reasonable approximation to this is given by the approxim- 
ation 


P = 


N.; ■ 

~E i "t l ~ 

v p 

^2^2 


t a 
p 


(92) 


for the asymptotic scarf joint solution for very long overlaps, whence 




P 

E2*t 2 

X 

Elti. 


(93) 


The optimum location of the transition from scarf angle 0i to e 2 can then be 
determined by trial and error using the stepped-lap joint computer program 
developed in Section 6. As a preliminary guide, it is suggested that one third 
of the total thickness be tried. The conversion of this conceptual scarf joint 
design into a practical stepped-lap joint is illustrated schematically in the 
lower part of Figure 9. It should be noted that the steps are thinner in the 
more critical load transfer region, and at the extreme opposite end for a 
single step to minimize potential peel stress problems. Normally peel stresses 
will not be a problem with stepped-lap joints for practical design configur- 
ations but the double-lap joint analysis can serve as a check if appropriate. 
The larger step sizes in the lightly loaded area effect an economy of fabric- 
ation which offsets the greater expense of proper detailing in the more crit- 
ical areas. 
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For reasons evident from the discussion above, the dual-slope scarf joint has 
merits in its own right as well as for a model for approximate stepped-lap 
joint analysis. The steepening of the scarf angle at one end is particularly 
important for the brittle adhesives for which x p is much higher than for the 
ductile adhesives. This greater importance follows from equation (91). 

One characteristic of the internal stress distribution within stepped-lap 
bonded joints is directly traceable to double-lap joint phenomena and has no 
counterpart in scarf joint behavior. This characteristic is that, once each 
or any step is sufficiently long to contain a fully-developed elastic trough 
in the adhesive shear-stress distribution, an increase in that step length does 
not alter the joint shear strength. Indeed, as confirmed by application of the 
computer programs A4EF and A4EG, the internal adherend and adhesive stresses 
at the ends of each and every step are invariant with respect to such step 
length increases, whether one, some, or all of the step lengths are increased. 
That this should be so follows directly from the governing equations for each 
step of the joint. These are precisely the same as for an unbalanced double-lap 
joint, the shear strength of which is independent of overlap beyond some value. 
The impact of this phenomenon on the design of stepped-lap bonded joints is 
that, if analysis indicates inadequate bond strength and the overlap is already 
reasonably great, no further increase in step lengths can accomplish an improve- 
ment in joint strength. It is necessary to increase the number of steps and 
decrease the incremental step thickness. 

The technique of refining the preliminary analysis developed by the rules above 
is as follows. An analysis is performed, and the limiting (critical) detail 
identified. If this is the strength of the end step of the stiffer adherend, 
the appropriate procedure is to decrease this length and increase the length 
of the other steps. A halving of the step thickness increment and doubling of 
the number of steps at the more critical end of the joint will also help. This 
situation can be identified by a solution in which the maximum adhesive shear 
strain developed is less than the allowable. In rare instances it may not be 
the very end but one or two steps inside which are critical. The procedure 
for improving the joint strength is the same. Reduce the length of the criti- 
cal steps and increase the others. In doing so, it should be remembered that 
any ful ly-elastic step will not transfer much more load even if its length is 
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increased. Furthermore, if the adhesive shear stresses at each end of the 
step are less than their plastic value, increasing the step length indefinitely 
will not introduce a plastic zone. If the adhesive shear strain is predicted 
to be the limiting feature rather than the adherend strength, the joint strength 
may be improved by increasing the number of joint steps. In doing so, steps at 
one end of the joint will tend to become critical and length increases in the 
remaining (elastic) steps will continue to increase the joint strength, but at 
a decreasing rate. The behavior of bonded scarf joints (Figure 6) serves to 
explain this approach. Since the average bond stress on a scarf joint approach- 
es a fixed fraction of the maximum bond shear stress, an overlap sufficiently 
long can always be found to develop a potential strength 50 percent in excess 
of the adherend strength. The only inherent difficulty in this approach is the 
care needed not to exceed the adherend allowables near the more critical end of 
the joint. One may look upon an optimally designed stepped-lap joint as an 
approximation to a dual slope scarf joint with a small angle at the less criti- 
cal end to build up the total load transferred and a steeper angle (still 
small) at the more critical end to prevent breaking off the tip of the adherend. 

In the presence of adherend thermal mismatch (advanced composite-to-metal for 
example), a reversal of load direction can reverse the more critical and less 
critical ends of the joint. Therefore it is necessary in such cases to design 
for both the maximum tensile shear and compressive shear loads to be applied. 

Figures 10 to 12 illustrate solutions obtained to stepped-lap bonded joint 
analyses using the computer programs above. The joint is drawn to scale in 
Figures 10 and 11 and the material properties can be found in the sample 
printout included in the Appendix. The brittle and ductile adhesives referred 
to are, respectively, Narmco Metlbond 329 and Hysol EA951 which have the shear 
characteristics illustrated in Figure 13. The elastic solutions in Figure 10 
show dramatically the sharp spikes in the shear stress distribution at the ends 
of each step. These spikes, separated by relatively lightly-loaded troughs, 
represent the influence of the uniform thickness steps. It is evident also 
from Figure 10 that the ductile adhesive, with its lower modulus and higher 
elastic shear strain carries slightly more load elastically than does the 
brittle adhesive. Figures 10 to 12 omit the influence of thermal mismatch be- 
tween adherends and, had this been included, the elastic strength disparity in 


40 



Figure 10 would have been very pronounced in favor of the ductile adhesive for 
a tensile shear loading. Figure 11 shows the computed bond shear stress dis- 
tributions, corresponding with Figure 10, when the adhesive properties are 
modified to account for plasticity. As is to be expected from the adhesive 
characteristics in Figure 13, this modification does not increase the joint 
strength of the brittle adhesive sufficiently for the bond to be stronger than 
the weaker adherend. The ductile adhesive, on the other hand, is computed to 
have a potential bond strength nearly as great as the strength of the titanium 
outside the joint. Actually, by the time the adhesive has used up only 15 
percent of its total shear strain capacity, the load level is so high as to 
cause the end (thin) titanium step to yield, as shown in the middle illustra- 
tion of Figure 11. The ductile adhesive has a considerable strength margin 
over the composite adherend. Figure 12 demonstrates how the theory identifies 
the end metal step as being prone to fatigue failure, even though the end step 
had been shortened to alleviate the problem. In the static load case the 
theory predicts that, once the titanium has yielded locally, as shown in the 
second illustration of Figure 12, the load level will increase until failure 
occurs in the composite at the end of the joint, as shown in the fourth illustra- 
tion. Figures 11 and 12 depict only the most critical conditions within each 
step because the computer program does not normally output a continuous solu- 
tion. The adhesive shear stress distribution throughout the lightly loaded 
regions is not crucial to the design/analysis cycle. For illustrative purposes 
one can easily artificially divide each step into a number of short segments 
in order to avoid adding another computation sequence to the programs. This 
has been demonstrated to be free from convergence problems (as confirmed by 
Figure 10) but, naturally, takes more computer time. 

The following table enumerates a number of solutions obtained with the stepped- 
lap joint computer programs above. The effects of thermal stresses are includ- 
ed, as also is the influence of the direction of the applied load. Of interest 
is the way in which the adherend thermal and stiffness imbalances compound to 
decrease the joint strengths for tensile loading while they counteract each 
other for the compressive loading. The failure modes predicted are identified 
by the comment codes 1 through 5 which are explained at the foot of the table. 

All cases except those for optimized step lengths have the joint geometry 
shown in Figure 10. In optimizing the joint proportions, the computer program 
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STRENGTHS OF STEPPED-lAP ADHESIVE-BONDED JOINTS 


JOINTS OF TITANIUM TO ISOTROPIC HTS GRAPHITE -EPOXY 
TITANIUM 0.25 IN. THICK GRAPHITE - EPOXY 0.264 IN. THICK 


FAILURE LOADS (LBS/INCH) 


N. AT 

ADHESIVE 

0° 

TENSION & 
COMPRESSION 

-280°F 

TENSION 

-280°F 

COMPRESSION 

OPTIMIZED STEP LENGTHS 

-400° F 
TENSION 

-400°F 

COMPRESSION 

-280° F 
TENSION 

-280°F 

COMPRESSION 

EPON 951 








PURELY-ELASTIC 

7829 

4927 

10730 

4367 

9990 

3683 

9203 

ELASTIC-PLASTIC 

14430 

11866 

16997 

18180 

18182 

10769 

17821 

POTENTIAL 








BOND STRENGTH 

28362 

26099 

30569 

23257 

27299 

25123 

45000 

COMMENTS 

1 t 2 

1 , 2 

1 , 4 

5 

5 

1 , 2 

1 / 2 

METLBOND 329 








PURELY-ELASTIC 

6764 

3812 

8552 




6152 

ELASTIC -PLASTIC 

13505 

10555 

16457 




17720 

COMMENTS 

3 

3 

3 

i 



3 


COMMENT LEGEND : I. TITANIUM YIELDS ON END (THIN) STEP 

2. FAILURE IN COMPOSITE OUTSIDE JOINT AT 18216 LB/IN. 

3. FAILURE IN ADHESIVE AT COMPOSITE END OF JOINT 

4. FAILURE IN COMPOSITE ONE STEP IN FROM TITANIUM END OF JOINT 

5. FAILURE IN COMPOSITE ONE STEP IN FROM COMPOSITE END 

AT =- OPERATING TEMPERATURE - CURE TEMPERATURE OF ADHESIVE 


was used to identify the most critical location and the step lengths were 
modified by hand for re-analysis until the minimum tensile and compressive 
joint strengths matched the composite adherend strength. This took only two 
iterations to achieve the results shown and this feature is one of the more 
beneficial merits of the complete internal joint analysis. 

Figure 14 illustrates the bond shear stress distributions for both ductile and 
brittle adhesives. A comparison is effected between a joint of uniform step 
lengths, at left, and that with optimized lengths, at right. A small loss in 
elastic joint strength is incurred by shortening the end steps (and some of 
this could be recovered by increasing the lengths of the other steps to com- 
pensate) but the problem of yielding the end titanium step has been eliminated 
for the ductile adhesive. It is interesting to observe that the brittle adhe- 
sive had insufficient strain energy in shear for the problem to arise. Another 
important phenomenon revealed is that the ductile adhesive uses up only about 
a third of its ultimate shear strain capacity in breaking the composite adher- 
end just outside the joint. This leaves a generous margin for dealing with 
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stress concentration due to Irregularities in load intensity or bond thickness 
across the width of the joint. Because of these ever-present considerations, 
the brittle adhesive should not be expected to develop the full predicted 
joint strength over each inch of a wide panel. Failure would be initiated by 
a local effect and then be propagated rapidly. 

Figure 14 omits consideration of thermal effects in order not to complicate 
the comparisons made. Figure 15 includes these effects for both tensile and 
compressive shear loading with the ductile adhesive. This figure compares the 
performance of the preliminary design (Figures 10 and 11) with the optimized 
design. Improvements in ultimate compressive strength and tensile fatigue 
load capacity are demonstrated. 
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8. CONCLUSION 


This report presents elastic and elastic-plastic analysis methods for adhesive- 
bonded scarf and stepped-! ap joints. The solutions obtained are analytic in 
form and the necessary digital computer FORTRAN IV programs are listed in the 
Appendices. These solutions are believed to be the first for such joints which 
account for adhesive plasticity. They include also the effects of adherend 
stiffness- and thermal -mismatch. While the precise solutions require iterative 
numerical solutions, explicit algebraic formulas are derived for a close lower- 
bound on the strength of scarf joints. The dominant characteristic of scarf 
joints is that, for long overlaps, the average bond stress asymptotes towards 
a fixed fraction of the peak bond stress, that fraction equalling the lesser 
ratio of adherend extensional stiffnesses. Unlike uniform lap joints, which 
reach a definite strength limit which cannot be exceeded by using longer over- 
laps, the potential bond strength of scarf joints increases indefinitely with 
overlap so that a design can always be devised in which the failure is forced 
to occur outside the joint. In using this approach, however, it is necessary 
also to check on the adherend stresses at the tip of the stiffer adherend to 
ensure that the scarf angle is not too small. Stepped-lap joints exhibit some 
characteristics of both the scarf joint and uniform double-lap joints. Those 
steps near the middle of a stepped-lap joint carry significantly more load than 
that transferred in the corresponding area of a uniform lap joint but the load 
so transferred is usually not a major contribution. Most of the load transfer 
is effected through the end three steps at one or both ends of the joint, 
depending on the nature of the adherend imbalances and the direction of the 
load. Within each step, since the governing equations are precisely the same 
as for an unbalanced double-lap joint, it is found that no further load can be 
transferred once the overlap has exceeded a determinable value. In other words, 
unlike scarf joints, the potential shear strength of stepped-lap joints cannot 
be increased indefinitely by increasing the overlap(s). The appropriate 
procedure is to employ more steps of finer thickness increments in order to 
augment the load capacity. Because scarf and stepped-lap joints can efficiently 
transfer load between thicker adherends than is possible with uniform double-lap 
joints, the latter are restricted to thinner sections in practical applications. 

The inclusion of adhesive plasticity in the analysis has a marked effect on the 
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strength predictions. On the other hand, the elastic adhesive stresses play a 
far more important role in the behavior of scarf and stepped-lap joints than 
they do for uniform lap joints. The inclusion in the analyses of thermal mis- 
match effects permits their application to the bonding of titanium to the 
advanced composite laminates and explains how the joint strength changes with 
the load direction in such a situation. 

The elastic-plastic analysis of the internal stresses within stepped-lap bonded 
joints provides sufficient information for the joint proportions to be optim- 
ized. Analyses should be performed for each load direction and at the extremes 
of the environmental temperature range, taking due account of material property 
changes with temperature, in the optimization sequence. 
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SCARF JOINT BETWEEN DISSIMILAR MATERIALS (c^of^ E^ = E^) 





RESIDUAL ADHESIVE SHEAR STRAIN 



T 


ADHESIVE SHEAR STRESSES 

UNDER PROGRESSIVELY INCREASING TENSILE LOADS 



CORRESPONDING ADHESIVE SHEAR STRAINS 

(NOTE THAT THE STRESSES AND STRAINS FOR PARTIAL LOADING, ABOVE, 
WOULD ALSO INDICATE THE BEHAVIOR UNDER STIFFNESS IMBALANCE 
IF (X| =od 2 AND E|t| > E 2 t 2 BUT, WHEREAS THE CRITICAL END REVERSES 
WITH LOAD DIRECTION FOR THERMAL IMBALANCE, IT REMAINS THE SAME 
FOR STIFFNESS IMBALANCE.) 


FIGURE I. EXPLANATION OF NON-UNIFORM ADHESIVE SHEAR STRESSES IN 
BONDED SCARF JOINTS BETWEEN DISSIMILAR ADHERENDS 
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(« 2 -o< t )AT X 

CTnERMO) = 7j—JT \ 

P \ £ .'l E 2*J 

(a, - a 2 )AT X 
CTHERM(2) = — — 7 - ; 

tp R + f*) 

NON-DIME NSIONALIZED 
JOINT PARAMETERS 


L Ax (REFERENCE) 

R 5 - + [ty* 


1 + (TT), + “ lAT 




(&)■ 


,+ (ik +ajAT 


5 JL h l (1 ^ 

2 Zjr L- Ax (REFERENCE) 

— 

DISPLACEMENTS AND ELEMENT LOADS 


FIGURE 2. NOTATION AND GEOMETRY FOR ADHESIVE-BONDED SCARF JOINT 
ANALYSIS 
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AVERAGE ADHESIVE SHEAR STRESS / MAXIMUM ADHESIVE SHEAR STRESS 


IDENTICAL ADHERENDS 




LOCATION A IS CRITICAL FOR BOTH POSITIVE (TENSILE LAP- SHEAR) 
AND NEGATIVE (COMPRESSIVE LAP-SHEAR) VALUES OF LOAD P 


FIGURE 3. EFFECT OF ADHEREND STIFFNESS IMBALANCE ON ELASTIC STRENGTH 
OF BONDED SCARF JOINTS 
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AVERAGE ADHESIVE SHEAR STRESS / MAXIMUM ADHESIVE SHEAR STRESS 




LOCATION A CRITICAL FOR CTHERM < 0 AND P > 0 

LOCATION A CRITICAL FOR CTHERM > 0 AND P < 0 

LOCATION B CRITICAL FOR CTHERM < 0 AND P < 0 

LOCATION B CRITICAL FOR CTHERM > 0 AND P > 0 


FIGURE 4. EFFECT OF ADHEREND THERMAL MISMATCH ON ELASTIC STRENGTH 
OF BONDED SCARF JOINTS 





NON-DIME NSIONALIZED JOINT STRENGTH 


10.0 



FIGURE 5. INTERACTION OF ADHEREND STIFFNESS AND THERMAL IMBALANCES 
FOR ElASTIC BONDED SCARF JOINTS 
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AVERAGE BOND SHEAR STRESS / MAXIMUM BOND SHEAR STRESS t av /t 




FIGURE 6. EFFECT OF ADHESIVE PLASTICITY IN REDUCING STRENGTH LOSS DUE 
TO ADHEREND STIFFNESS IMBALANCE FOR BONDED SCARF JOINTS 
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AVERAGE ADHESIVE SHEAR STRESS / MAXIMUM ADHESIVE SHEAR STRESS 



NON-DIMENSIONALIZED OVERLAP Xl 


(See Figures 2 , 3 and 4 for notation) 


FIGURE 7. EFFECT OF ADHESIVE PLASTICITY IN REDUCING STRENGTH LOSS DUE 
TO ADHEREND THERMAL MISMATCH FOR BONDED SCARF JOINTS 
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DISPLACEMENTS AND ELEMENT LOADS 


FIGURE 8. NOTATION AND GEOMETRY FOR ADHESIVE-BONDED STEPPED-LAP 
JOINT ANALYSIS 
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(A) . IDEALIZED DUAL-SLOPE SCARF JOINT 
TO PROTECT TIP OF STIFFER ADHEREND 



CENTER LINE 


(B) . REPRESENTATION OF OPTIMIZED STEP PROPORTIONS 

FOR STEPPED- LAP JOINT WITH MODULUS OF COMPOSITE 
LAMINATE LESS THAN THAT OF METAL ADHEREND 


FIGURE 9. PRACTICAL PROPORTIONING OF STEPPED-LAP JOINTS TO PROTECT 
AGAINST FATIGUE FAILURES AT TIP OF METAL ADHEREND 
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SCALE 0 


2 


3 INCH 



POSITION ALONG JOINT 


FIGURE 10. ELASTIC SHEAR STRESS DISTRIBUTIONS FOR BRITTLE AND DUCTILE 
ADHESIVES IN BONDED STEPPED-LAP JOINTS 
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FIGURE II 


(0°/±45°/90 P) HTS GRAPHITE-EPOXY 



6AI-4V TITANIUM 


to 


to 

to 

LU 

O' 

I— 

to 

o' 

< 

LU 

X 

to 

LU 

> 

to 

LU 

X 

a 

< 

u 

t— 

to 

< 

_i 

Q_ 

U 

I— 

to 


9 

8 

7 

6 

5 

4 

3 

2 

I 

0 


6 

5 

4 

3 

2 

I 

0 


★ 0 


y = 0.112 

max 


BRITTLE ADHESIVE AT ULTIMATE 
0 SHEAR CAPACITY 

° o o 

p = 13505 Ib/in. 

i I I I 1 


y = 0.226 

max 

DUCTILE ADHESIVE q 
O AT YIELDING OF 

^ TITANIUM 

° o o 

P = 14430 Ib/in. 

i 1 I I 1 


3 5- 


-+-©—© ©O 


y =1.7 
max 


<3 P 


DUCTILE ADHESIVE AT 
ULTIMATE SHEAR CAPACITY 


J L 


P = 28262 Ib/in. 

I 1 


POSITION ALONG JOINT 


. ELASTIC-PLASTIC SHEAR STRESS DISTRIBUTIONS FOR BRITTLE AND 
DUCTILE ADHESIVES IN BONDED STEPPED-LAP JOINTS 
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FIGURE 12. ADHEREND STRENGTHS AND INTERNAL LOADS FOR BONDED 
STEPPED-LAP JOINTS 
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4 INCH 0 


SCALE 


6AI-4V TITANIUM 


(0°/ ♦ 45°/90°) HTS GRAPHITE-EPOXY 

NO THERMAL STRESSES (4T = 0°) 
JOINT GEOMETRIES (DIFFERENT END STEPS) 


T mox = 6000 P si 


t max = 6000 P si 


7 = 0.1 

max 


y = 0.1 

max 


P = 8249 Ib/in. 


O o o 


o o o 

P = 7180 Ib/in. 


ELASTIC ADHESIVE SHEAR STRESS (DUCTILE ADHESIVE, EPON 951) 


X ~ 6000 psi 
max r 


y = 0.195 
max 


o o o 

f" TITANIUM YIELDS HERE 
P = 14034 Ib/in. 


(BOND STRENGTH 38696 Ib/in.) 


T max = 6000 P si 


y = 0.65 

max 


C. O O 

COMPOSITE FAILS HERE 

NO YIELD IN TITANIUM 
P = 1 81 81 Ib/in. 


(BOND STRENGTH 25859 Ib/in.) 


ELASTIC-PLASTIC ADHESIVE SHEAR STRESS (DUCTILE ADHESIVE, EPON 951) 


t = 9000 psi 
max r 


T mo* * 9000 ^ 


y = 0.045 
max 


y = 0.045 

max 


O o O 


P = 6796 Ib/in. 


o o o 

P = 6608 Ib/in. 


ELASTIC ADHESIVE SHEAR STRESS (BRITTLE ADHESIVE, METLBOND 329) 


r = 9000 psi 
max 


T - 9000 psi 
max 


y = 0.112 

max 


O o 


y = 0.112 

max 


O O 


P = 13592 Ib/in. 


P = 13076 Ib/in* 


ELASTIC-PLASTIC ADHESIVE SHEAR STRESS (BRITTLE ADHESIVE, METLBOND 329) 


FIGURE 14. COMPARISON BETWEEN STEPPED-LAP JOINTS WITH UNIFORM STEP 
LENGTHS AND WITH OPTIMIZED STEP LENGTHS 
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TENSION 


I — FAILURE IN COMPOSITE AT 18216 Ib/in. 

I r- YIELD IN TITANIUM AT 11866 Ib/in. 







FAILURE IN COMPOSITE AT 16997 Ib/in. 


in _ * 


COMPRESSION 


NOTE THAT TITANIUM END STEPS WERE ALREADY SHORTENED DURING 
PRELIMINARY DESIGN. WITH UNIFORM STEPS 0.75 IN. LONG THROUGHOUT, 
PREMATURE FATIGUE FAILURE WOULD OCCUR AT A, FOLLOWED BY 
FAILURE OF COMPOSITE AT THE SAME (REDUCED) SECTION. 

(A) PRELIMINARY DESIGN 


(0°/45 o /-45 o /90°) HTS GRAPHITE - EPOXY 
TENSION 





FAILURE IN COMPOSITE AT 18180 Ib/in. 


JS. 


6AI-4V TITANIUM 


/IS* 


t— FAILURE IN COMPOSITE AT 18182 Ib/in. 
COMPRESSION 

NO YIELDING OF TITANIUM 


(B) OPTIMIZED DESIGN 

DUCTILE ADHESIVE CURED AT 350°F. 

STRENGTHS CALCULATED AT ROOM TEMPERATURE. 

STRENGTH OF COMPOSITE ADHEREND OUTSIDE JOINT = 18216 Ib/in. 

POTENTIAL BOND SHEAR STRENGTH WOULD EXCEED 23257 Ib/in. IN EVERY CASE 
SHOWN IF ADHERENDS WERE SUFFICIENTLY STRONG. 


FIGURE 15. OPTIMIZATION OF DETAILS IN STEPPED-LAP BONDED JOINTS 
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APPENDICES 


A.l Computer Program A4EC For Elastic Strength of Bonded Scarf Joints 

The FORTRAN IV digital computer program associated with the analysis in Section 
2 is listed below. This program has been checked out thoroughly and sample 
solutions are illustrated in Section 4. Only shear stresses are considered, 
with the peel stresses neglected in accordance with the very small scarf angles 
used in practice. As discussed in Section 2, there are severe convergence 
problems associated with the series solution to this problem. While the aver- 
age shear stresses computed are considered very reliable, no computation se- 
quence for the stress distribution was found which was considered sufficiently 
accurate over the far end of the joint (x/«. - l). The peak shear stress is 
located correctly by program A4EC at one end or other of the overlap. The only 
real need for a shear stress distribution is as an intermediate step in the 
computation of the internal adherend stresses. Since the convergence of the 
series was enhanced greatly by prior integration into the contributions to the 
average shear stress, it is recommended that any attempt to pursue the adherend 
stress distribution should proceed along similar lines. The adhesive shear 
stress distribution series can be integrated mathematically so that a more 
tractable series solution is obtained for the adherend stresses. The first 
two terms follow from the average shear stress solution and the subsequent 
ones would derive from recurrence formulae. The condition under which a need 
for such information could arise is the possible breaking off of the thin tip 
of the stiffer adherend for a very small scarf angle. Such a situation is un- 
likely for perfectly elastic adhesives because the shear stress drops off very 
rapidly away from the ends. A simpler procedure is available for the elastic- 
plastic adhesive. 

The format of the input data necessary to operate the A4EC computer program is 
as fol 1 ows : 

CARD 1: 

FORMAT (415) 

IMAX = Number of thermal mismatch coefficients. IMAX .LE. 20. 
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JMAX = Number of non-dimensional i zed overlaps. JMAX .LE. 40. 

(Note that this is one more than the number of overlaps to be read 
in. The limiting case of 0L(1)=0 is set by the program.) 

KM AX = Number of adherend stiffness imbalances. KMAX .LE. 10. 

(Note that this controls the number of columns of answers printed 
across the page and cannot be increased indefinitely.) 

NMAX = Number of terms in power series. 10 .LE. NMAX .LE. 50. 

(Note NMAX = 20 is recommended.) 

CARDS 2, 2A, 2B, etc.: 

FORMAT (12F6.2) 

0L(J)= Non-dimensionalized overlaps. Number restricted to 40 by dimension 
statement. (Note that 0L(J) must be read in in ascending order and 
that 0L(2), which is the first entry on card 2, must not exceed 0.5 
because of internal computations. 0L(1) = 0 is set by program as 
limiting case.) Values of 0L(J) exceeding 50 are impractically 
1 arge. 

CARDS 3, 3A, 3B, etc.: 

FORMAT (10F5.2) 

ETR(K)=Adherend stiffness ratios (E 1 t 1 )/(E 2 t 2 ). Number restricted to 10 
by dimension statement. (Subscripts 1 and 2 must be identified so 
that 0 .LT. ETR .LE. 1. Array should be read in in ascending or 
descending order.) 

CARDS 4 , 4A , 4B , etc . : 

FORMAT (10F7.3) 

CTHERM(I) = Adherend thermal mismatch coefficients in non-dimensionalized 
form. Number restricted to 20 by dimension statement. (Note that 
equal and opposite values must be read in consecutively to account 
for the difference between tensile and compressive application of 
the shear load. Values of up to ±5 are sufficient for the avail- 
able range of adhesives. Greater values are usually associated 
with failure of the joint under residual thermal stresses alone.) 
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The complete listing follows, along with sample output pages. The output tables 
come in pairs with the ratio of the average to maximum adhesive shear stress 
and the non-dimensional ized joint strength (t„,/t_)(xji) as functions 

dv p aV p 

of the adherend extensional stiffness ratio etr = E^^ta - l horizontally and 
the non-dimensional ized joint overlap *£ = 

Each table is prepared for a single value of thermal mismatch coefficient 

(c*2 - <*l )ATX 

ctherm = — : r and equal and opposite values are treated in 

T / — — + “ ^ 

PyE^t i ^ 2^2 / 

turn to cover both tensile and compressive shear loadings. 


nVEit! 


i z vertically. 
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CDECK 44FC 

C ELASTIC ANALYSIS DF UNBALANCED SCARF JOINTS 
VON-D IHFNSTDNALIZFO FORMULATION 
AVERAGE STRESSES 

STIFFNFSS AND THERMAL IMBALANCES ACCOUNTED FDR 
DATA PRES C NT AT ION FOR TENSILE SHEAR LOADING 
CHANGF SIGN OF CTHFRM TO USE FOR COMPRESSIVE SHEAR LOADS 
DIMENSION DL ( J ) « ETR(K), CTHFRMI I) , AIN, 2), TRATIO(N,2), 
l T AUA VGI J , K ) , I CR TND ( J , K ) , STRGTH ( J • K ) * SIG(N,2I, 
DIMENSION DL(40I, ETR(IO), CTHERMI 201 » A(50,2), S 

l TR AT 10(50,2), TAUAVGI AO, 10) , I CRTND( 40, 10 ) , STRGTHI40, 

READ IN ARRAY SIZES 

READ (5,10) I M AX * JMAX, KMAX , NMAX 
10 FORMAT (415) 

IMAX .LF. 20, JMAX .LF. 40, KMAX .LE. 10, NMAX .LE. 50 .AND. 
READ IN NON-DIMENSIONAL IZFD OVERLAP ARRAY 
OL ( I ) = 0 . 

0L( 2) MUST BF .LE. 0.5 BECAUSE OF A SUBSEQUENT TREND CHECK 
DL(J) MUST BE IN ASCENDING ORDER 

READ (5,20) (OI.(J), J = 2, JMAX) 

20 FORMAT ( 12F6.2 ) 

READ IN STIFFNESS IMBALANCE ARRAY 

IDENTIFY ADHERENDS l AND 2 SUCH THAT ETR(K) = (ET)1/(ET)2 .LE 
READ (5,00) (FTR(K), K = l, KMAX) 

30 FORMAT ( 10F5.2) 

READ IN NON-DIMFNSIDNALIZED THERMAL MISMATCH COEFFICIENTS 
READ (5,40) ( CTHERMI I ) , I = l, IMAX) 

40 FORMAT ( 10F7.3) 

PRINT OUT INPUT DATA 

WRITE (6,50) IMAX, JMAX, KMAX, NMAX 

OH IMAX = , 12, 9H JMAX = , 12, 9H KMAX = 

, 12) 

( OL ( J ) , J = 1, JMAX) 

OVERLAPS/, 12F6.2) 

(FTR(K), K = l, KMAX) 

STIFFNESS IMBALANCES/, 10F5.2I 
(CTHERM(I), I = 1. IMAX) 

THERMAL MISMATCHES/, 10F7.3) 

ZERO OVERLAP 


60 

70 


80 

SET 


Of jui 

50 FORMAT ( l H l , 

1 OH NMAX = 

WRITE ( 6 9 60 ) 

FORMAT ( 10H 
WRITE (6,70) 

FORMAT ( 22H 
WRITE (6,80) 

FORMAT ( 20H 
UNIFORM STRESS FOR 
00 90 K = I, KMAX 
TAUAVG(ltK) = l* 

STRGTH ( 1 , K ) = 0. 

START OF COMPUTATION DO LOOPS 
00 310 I = l, IMAX 
00 180 K * It KMAX 
00 180 J = 2, JMAX 

ESTABLISH AOHER END 1 END OF JOINT AS REFERENCE ^ ^ ^ 

SUBSEQUENTLY CHECK WHETHER ADHEREND 1 END OR AOHERENO 2 END 
NCRTND = 1 
THFRMC = CTHERMI I ) 

VR 3 FTR(K) 

IF ( ( VR • NE • 1.) • OR * (THERMC .NE. 0.1) GO TO 100 
UNIFORM STRESS FOR BALANCFD JOINTS 


12 , 


90 


C SET 


1. 

OL ( J ) 
0 


TAUAVG( J,K) 

STRGTHC J,K) 

ICRTNOC J , K ) 

GO TO 180 
VI * 1 • ♦ VP 
V2 = VR / VI 
V3 * (1. - VR) 

OLAP = OLCJ) 

0LAP2 * OLAP ♦ OLAP 
COMPUTE INITIAL TERMS OF 


100 


/ VI 


A ( l , 1 ) 

A ( 2 , 1 ) 
A(3,l) = 
A ( 1 , 2 ) = 
A ( 2 , 2 ) * 
A ( 3, 2 ) * 
COMPUTE NMAX 
00 110 N 
DO 110 M 
110 A ( N, M ) * 
1 

COMPUTE A2 
MOTE THAT 


SERIES, ASSUMING A ( 1 , 1 ) *A ( 2 , 2 ) «!• 6 


♦ ( -THERMC ♦ V3*0L AP ) 


V2 /2. ) ♦ 1./6. 
STRESS POWER SERIES 


1 20 = 5 

COMPUTE A2( NMAX ) 

A2SAVE * ( T HERMC/OLAP ♦ V2 - ( $ I G( NMAX , 1)/ VI ) ) / 

l ( (SIG(NMAX,2)/Vi) ♦ ( 1 • /OL AP2 ) ) 

COMPUTE AVERAGE SHEAR STRESS IN BOND 

TRATIOIJ, NCRTND) * VI * (V2 ♦ THERMC/OLAP - A2SAVE/0LAP2 ) 
CHECK WHICH END OF JOINT IS CRITICAL 
IF ( NCRTNO . FQ . 2) GO TO 130 


S I G ( 3 , 1 ) 
S I G( 3, 2 ) 
00 120 N 
SI G( N, 1 ) 
S I G( N, 2) 


( OLAP/6. ) 

0, 

0.5 

(0LAP2 / 6.) * ( 

TERMS OF AVERAGE 
* 4, NMAX 
M * 1, 2 

* ( ( I N-2 ) *( N-l I ♦ 0LAP2 * V2 ) * A ( N-l ,M) 

♦ V3 * 0LAP2 * A(N-2,M) > / (N*<N-1>) 

THROUGH RAPID CONVERGENCE OF AVERAGE STRESS 
INDIVIDUAL TERMS IN DISTRIBUTION DO NOT CONVERGE AS 


l. ♦ A ( 3 , 1 ) 
0.5 «- A ( 3, 2 ) 
4, NMAX 
S I G ( N- 1 , l ) + 
S!G< N-l t 2 ) ♦ 


A ( N , 1 ) 
A ( N, 2 ) 


A4EC001 0 
A4EC0020 
A4EC0030 
A4EC0040 
A4 EC 005 0 
A4EC0060 
A4EC0070 
A4EC0080 
A4EC0090 
I G( 50 ,2 ) ,A4EC0100 
10) A4EC0110 

A4EC0120 
A4EC0130 
A4EC0140 
.GE. 10 A4EC0150 

A4EC0160 
A4EC0170 
A4EC0180 
A4EC0190 
A4EC0200 
A4EC0210 
A4EC0220 
. 1. A4EC0230 

A4EC0240 
A4EC0250 
A4EC0260 
A4EC 0270 
A4FC0280 
A4EC0290 
A4EC0300 
A4EC03 1 0 
A4EC0320 
A4EC0330 
A4EC0340 
A4EC0350 
A4EC0360 
A4EC0370 
A4EC0380 
A4EC0390 
A4EC0400 
A4EC0410 
A4EC0420 
A4EC0430 
A4EC0440 
A4EC0450 
A4EC0460 
A4EC0470 
IS CRITICAA4EC0480 
A4EC0490 
A4EC0500 
A4EC051 0 
A4EC0520 
A4EC0530 
A4EC0540 
A4EC0550 
A4EC0560 
A4EC0570 
A4EC0580 
A4EC0590 
A4EC0600 
A4EC0610 
A4EC0620 
A(1«2)*A< A4EC0630 
A4EC0640 
A4EC0650 
A4EC0660 
A4EC0670 
A4EC0680 
A4EC0690 
A4EC0700 
A4EC0710 
A4EC0720 
A4EC0730 
A46C0740 
A4EC0750 
RAPIDLY A4EC0760 
A4EC0770 
A4EC0780 
A4EC0790 
A4EC0800 
A4EC0810 
A4EC0820 
A4EC0830 
A4EC0840 
A4EC0850 
A4EC0860 
A4EC0870 
A4EC0880 
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IF ( THERMC .IT* 0.) GO TO 
C IF AOHFR END 2 END IS CRITICAL 
NCRTND = 2 
VR = l. / VR 
THERMC = - THERMC 
GO TO 100 
130 CONTINUE 


130 

INTERCHANGE 


1 ANO 2 AND RECOMPUTE 


IDENTIFY AVERAGE SHEAR STRESS 


CRI TICAl 
JOINT OR 


END 


IN 


.LT. 0 


150 

170 


.EQ. l.n GO TO 160 


. GE. 0.) .AND. 


CHECKED OUT 
IS IN MIDDLE OF JOINT 
JOINTS BROKEN WITHOUT 
IS EXAMINED 
EXCESSIVE LENGTH IS 


LOAD 


/ MAXIMUM SHEAR STRESS £ 

NOTE THAT INITIAL SELECTION CRITERIA ASSUME ONE ENO OF 

1 OTHER IS CRITICAL AND PRECLUDE POSSIBILITY OF MAXIMUM STRESS 

2 MIDDLE. SUBSEQUENT SEPARATE CHECK ON THIS CONDITION. 

IF ( C THERM ( I ) .GT. 0.) GO TO 140 

BOTH IMBALANCES WILL INEVITABLY COMPOUND FOR CTHERMC I ) 
l SINCE FTR(K) .LE. 1.. HENCE NCR TNO = 1 
I C R TNO ( J , K ) = 1 

IF (TRATIOIJt l) .GE. 0.1 GO TO 160 
IF (TRATIOU.l) .LT. 0.) GO TO 150 
140 CONTINUF 

IDENTIFY MORF POWERFUL IMBALANCE FOR NULLIFYING BEHAVIOUR (NCRTNO = 

1 CTHERM(I) .GT. 0. .ANO. ETR ( K ) .LE. 1. 

COVER SITUATION WHERE THERMAL IMBALANCE DOMINATES OVER STIFFNESS 
1 IMBALANCE. NOTE NEED OL (2) .LE. 0.5 FOR THIS CHECK. 
ICRTND(JfK) = 2 

IF ((TRATIO(2,l).GT.l.l.AND*{TRATIO(Jt2).LT.O.))GO TO 
IF ( ( TRATI0(2t l).GT.l. ).AND.(TRATI0(J,2) . L F . 1 . ) ) GO TO 
CHECK IF TWO IMBALANCES PRECISELY CANCEL 
ICR TND ( J , K ) = 0 

IF ( ( TRAT I 0 ( j , l ) .EQ. 1.) .AND. (TRATI0(J,2> 

CHECK IE STIFFNESS IMBALANCE DOMINATES 
I CRTNDI J t K ) = 1 

I F ( ( TR AT I 0( J , 1 ) .LE. 1.) .AND. (TRAT!0(J,1) 

1 (TRATI0(Jt2) .GT. 1.)) GO TO 160 
ALL POSSIBILITIES FOR FIT HER FND CRITICAL 
ONLY POSSIBILITY REMAINING IS THAT TAUMAX 
NOTE THAT THIS PHENOMENON ARISES ONLY FOR 

1 WHEN THE LOAD IN THE OPPOSITE SENSE 
COMBINATION OF SFVERE THERMAL MISMATCH AND 
IDENTIFY FAILURF CASES BY ASTERISKS 

TAUAVG(JfK) = 100. 

S TROTH ( J , K ) = 1000. 

ICRTND ( J , K ) = 10 
GO TO 18 0 

ZERO STRENGTH ATTATNFO 
150 T A U A V G ( J*K ) = 0. 

STRGTH I J # K ) = 0. 

GO TO l BO 
AOHERFND l FND OF 
160 TAUAVGIJtKI = 

STRGTHI J , K ) = 

GO TO 180 
ADHEREND 2 ENO OF 
170 T AtJAVG I J » K ) = 

STRGTH ( J * K ) = 

180 CONTINUE 

IDENTIFY CRITICAL END OF 
00 190 K = it K M A X 
l 90 ICRTND(ltK) = I CRT N D ( 2 1 K ) 

HENCE NEED 0L( 2 ) .LF. 0.2 

IF ( f T HE R M ( I ) .NE. 0.) GO TO 210 
PRINT OUT SPECIAL HEADING FOR ZERO THERMAL 
WRITE (6,2001 (FTR(K) f K = 1, KMA X ) 

200 FORMAT ( IH1,10< /) , 31X, 48HADHES I VE-BONDEO SCARF JOINTS (ELASTIC 
INALYSISI/t 3P X f 31HNON-OIMENSIONALI ZED FORMULATION//, 

2 38X v 33HZERO THERMAL MISMATCH COE c F I C I EN T / / , 

3 68X, 2 RHO = BOTH F ND S EQUALLY LOADED/, 20X, 72HAVERAGE 

4ESS / MAXIMUM SHEA& STRESS , 1 = SOFT ET END CRITICAL/, 

5 68X, 25H2 = STIFF ET END CRITICAL//, 

6 8H SCALED, 31X, 3 9HE X TF N $1 ONA L STIFFNESS (THICKNESS) 

7 7H L / T/ , 7H RATIO/, 1H+, 4X, 10F10.1//) 

GO TO 230 

210 THERMO = - C THERM( I ) 

PRINT OUT HEADING 

WRITE ( 6, 220) CTHE RM { [ ) f 
220 FORMAT ( 1 HI , 1 0 ( / 1 , 3 1 X , ' 

1NALYS I S ) /, 39 X , 31 HNON-DI MFNS I ONAL I Z ED FORMULATION//, 


JOINT CRITICAL 
TRATIfM J,l) 
TAUA VG ( J , K ) 


♦ OL ( J 1 


JOINT CRITICAL 
TRATI0(J,2> 
TA!JAVG( J ,K) 


* OL ( J ) 


JOINT FOR ZERO OVERLAP 


MISMATCH BETWEEN ADHERENDS 


A4EC0890 
A4EC0900 
A4EC091 0 
A4EC0920 
A4EC0930 
A4EC0940 
A4FC0950 
A4EC0960 
A4EC0970 
A4EC09R0 
A4EC0990 
A4EC1000 
A4EC1010 
A4ECL020 
A4EC1030 
A4ECI040 
A4EC1050 
A4EC1060 
) A4EC1070 
A4EC1080 
A4EC 1090 
A4ECU00 
A4EC1110 
A<f EC 1 1 20 
A4EC1130 
A4ECI 140 
A4ECI150 
A4EC1160 
A4EC11T0 
A4FC1180 
A4ECII90 
A4EC1200 
A4EC 1210 
A4ECI220 
A4EC1230 
A4 EC 1 240 
NEC ESS A A4EC 1250 
A4EC1260 
A4 EC 1270 
A4EC1280 
A4ECI290 
A4EC 1300 
A4EC1310 
A4EC1320 
A4 EC 1 330 
A4 EC 1340 
A4FC 1350 
A4EC1360 
A4EC1370 
A4EC13S0 
A4FC1390 
A4EC1400 
A4EC1410 
A4EC1420 
A4EC 1430 
A4 EC 1440 
A4ECI450 
A4EC1460 
A4 EC 14 7 0 
A4EC1480 
A4EC1490 
AA4EC 1500 
A4EC15L0 
A4EC1520 
SHEAR STRA4EC1530 
A4FC1540 


RATIO/, 


I , THERMC , (ETR(K), K = 1, KMAX ) 
48HADHESI VE-BONDED SCARF JOINTS 


A4EC1550 
A4EC1560 
A4EC1570 
A4EC1580 
A4FC1590 
A4 EC 1600 
A4EC1610 
(ELASTIC A A4EC1620 
17X , 31HTHERA4EC1630 


2MAL MISMATCH COEFFICIENT = , F6.3, 17H FOR TENSION, = ,F6.3, 16H 

3F0R COMPRESSION//, 68X, 28H0 = BOTH ENOS EQUALLY LOADED/, 

4 20X , 72HAVERAGE SHEAR STRESS / MAXIMUM SHEAR STRESS 

51 = SOFT ET END CRITICAL/, 69X, 25H2 = STIFF ET END CRITICAL//, 

6 8 H SCALED, 31X, 39 HF XTF N S I ON A L STIFFNESS (THICKNESS) RATIO/, 

7 7 H L/T/, 7H RATIO/, LH+ , 4X, 1QF10.1/) 

230 CONTINJ c 

PRINT OUT TABULATIONS OF AVERAGE BOND STRESSES 
DO 250 J = l, J M A X 

WRITE (6,240) OL(J), ( ( T AU A VG ( J , K ) , I CR TND( J , K ) ) , K * 1, 

240 FORMAT (1H , F6.2, 2X, 10<F7.5, IX, II, IX)) 

250 CONTINUE 

IF (CTHERM(I) .NE. 0.) GO TO 270 


KMAX) 


A4FC1640 
A4EC1650 
A4EC1660 
A4EC1670 
A4EC1680 
A4EC 1690 
A4EC1700 
A4EC1710 
A4EC1720 
A4EC 1^30 
A4EC1740 
A4EC1750 
A4EC1T60 
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C PRINT OUT SPECIAL HEADING FOR ZERO THERMAL MISMATCH 8ETWEE 
WRITE (6.260) (ETR(K), K * 1, KMAX ) 

260 FORMAT ( IH1 , 10 ( / ) * 31X , 48HADHE S I VE-80NDED SCARF JOINTS 
1NALYSIS)/, 3°X * 31 HNON-DI MENS I ONAL I ZED FORMULATION//. 

2 38X, 33HZER0 THERMAL MISMATCH COEFFICIENT//, 

3 68X * 28HO * ROTH ENDS EQUALLY LOADED/, 20X, 72HN0N-D 

4ED STRENGTH , 1 = SOFT ET END CRITICA 

5 68X , 25H2 * STIFF FT END CRITICAL//, 

6 RH SCALED, 31X, 39HFX TENS I ONAL STIFFNESS (THICKNESS 
T 7H L/T/, 7H RATIO/, 1H+, 4X, 10*10.!//) 

GO T 0 290 

C PRINT OUT HEADINGS 

270 WRITE (6.280) CTHERM(I), THE RMC , (ETR(K), K = 1, KMAX) 
280 -FORMAT ( 1 H 1 , 1 0 ( / ) , 3 1 X , 4RHADHESI VE- BONDED SCARF JOINTS 
INAL YS IS)/, 39X , 31HN0N-D I MENS I ONAL I ZED FORMULATION//, 
2MAL MISMATCH COEFFICIENT = , F6.3, 17H *0R TENSION, = 
3F0R COMPRESSION//, 69X, 28HO = BOTH ENDS EQUALLY LOAOED 

4 20X, 72HNON-OIMENSI0NALIZED STRENGTH , 

51 = SOFT ET END CRITICAL/, 68X, 25H2 * STIFF ET END CR 

6 RH SCALEO, 31X, 39HF XTENSI ONAL STIFFNESS (THICKNESS 

7 7H L/T/, 7H RATIO/, 1H+, 4X , 10F10.1/) 

290 CONTINUE 

C PRINT OUT TABULATIONS OF NON-D I MENS ION AL I ZE D STRENGTHS 
DO 310 J * 1. JM AX 

WRITE (6.300) OL ( J ) * ( ( STR GTH < J , K ) , ICRTND( J ,K ) ) , K = 
300 FORMAT (1H , F6.2, 2X, !0<F7.* f IX, II, IX)) 

310 CONTINUE 

WRITE (6,320) 

320 FORMAT (1H1, IBM PROGRAM COMPLETED/) 

STOP 

END 


N ADHERENDS A4EC1770 
A4EC1780 
(ELASTIC AA4EC1790 
A4EC1800 
A4EC1810 
IMENSION AL I Z A4EC 1820 
L/, A4EC1830 

A4EC1840 

) RATIO/, 


) RATIO/, A4EC1850 
A4EC1860 
A4EC1870 
A4EC1880 
A4EC1890 
(ELASTIC A A4ECI 900 
17X, 31HTHERA4EC1910 
, E6. 3 , 16H A4EC1920 
/, A4EC1930 

A4EC1940 
IT1CAL// , A4EC1950 

) RATIO/, A4EC1960 
A4EC1970 
A4 EC 1980 
A4EC1990 
A4EC2000 
1, KMAX) A4EC2010 
A4EC2020 
A4EC2030 
A4EC2040 
A4EC2050 
A4EC2060 
A4EC2070 


1, KMAX) 
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AD HE S I VE- BONDED SCARF JOINTS (ELASTIC ANALYSIS) 

NON-DIME NS I ONAL t ZFO FORMULATION 

THERMAL MISMATCH COFFFICIFNT = 1,000 FOR TENSION, - -1.000 FOR COMPRESSION 

0 * BOTH ENDS EQUALLY LOADED 

NON-DIMENSIONAL l ZED STRENGTH , 1 * SOFT ET END CRITICAL 

2 « ST IFF ET END CR I T ICAL 


SCALEO 

L/T 

RATIO 

0 .0 

0.1 

0.0 

2 

<\j 

o o 
o 

2 

0.3 

0.0 

2 

EXTENSIONAL STIFFNESS (THICKNESS! RATIO 
0.* 0.5 076 0.7 

0.0 2 0.0 2 0.0 2 0.0 2 

0.8 

0.0 

2 

0.9 

0.0 

2 

1.0 

o.c 

2 

0.20 

0.1832 

2 

0. 1326 

2 

0 .1822 

2 

0.1818 

2 

0.1814 

2 

0.1811 

2 

0. 1808 

2 

0.1806 

2 

0.1804 

2 

0 . 1 802 

2 

0.50 

0 .*2*5 

2 

0.4161 

2 

C.4P93 

2 

0. *C 35 

2 

0.3987 

2 

0.3945 

2 

0. 39C9 

2 

0 . 3877 

2 

0.3849 

2 

0.3823 

2 

1 .CO 

0.9012 

2 

0.3301 

2 

0.7765 

2 

0. 7347 

2 

0.7012 

2 

0.6736 

2 

0.6*07 

2 

0.6312 

2 

0.6145 

2 

3. 60C0 

2 

1 .20 

1.1853 

2 

1.0527 

2 

0.9576 

2 

0.8861 

2 

0.8304 

2 

0.7*57 

2 

0.7491 

2 

0.7186 

2 

0.6927 

2 

0 ■ 6 7 C 6 

2 

1.50 

1.3831 

1 

1 . 50 JO 

? 

1.3016 

2 

1.1615 

2 

1.0571 

2 

0.9765 

2 

0.9123 

2 

0.360 1 

2 

0.8166 

2 

0 • 7000 

2 

1.70 

1 • *85 8 

l 

1.6219 

i 

1.5915 

2 

1.3857 

2 

1.2372 

2 

1.1251 

2 

1 . 03 75 

2 

0.9671 

2 

0.9C93 

2 

0.861 1 

2 

2.00 

1.6072 

1 

1.7734 

1 

1 

1.9453 

l 

1 .7899 

2 

1.5561 

2 

1 .3850 

2 

1.2545 

2 

1.1516 

2 

1.0685 

2 

1 .0000 

2 

2.50 

1.7635 

1 

1.9393 

2.2144 

l 

2.4369 

1 

2 . 2 1 3 6 

2 

1.9151 

? 

1.6943 

2 

1.5244 

? 

1 .3899 

2 

1 .280 5 

2 

3.00 

1.8839 

1 

2.1613 

1 

2.4410 

1 

1 

2.7295 

1 

3.0000 

2 

2.5*62 

2 

2.2171 

? 

1.9674 

2 

1.7723 

2 

1 .6154 

2 

*.00 

2.066* 

l 

2.4*16 

l 

2.8242 

3.2124 

1 

3.6C46 

l 

*.0000 

2 

3.4262 

2 

2.9971 

2 

2.6647 

2 

2 . 4000 

2 

5.00 

2.208* 

1 

2.6771 

1 

3. 1597 

1 

3.6525 

1 

4.1531 

1 

4.6596 

l 

4.7517 

2 

4.1334 

2 

3.6556 

2 

3 .2759 

2 

6.00 

2.3299 

1 

2 . 390 9 

! 

3.47^2 

l 

4.0681 

1 

4.6749 

1 

5.2897 

1 

5.9108 

1 

5.3214 

7 

4.6966 

2 

*.2000 

2 

8.00 

2.5*22- 

1 

3.2832 

1 

4.0670 

1 

4. 8679 

l 

5.6841 

1 

6. 511 2 

1 

7.3463 

1 

7 . 76 3 7 

2 

6.8473 

2 

6.1176 

? 

10.00 

2.735* 

1 

3.6639 

1 

4.6469 

1 

5.6578 

l 

6.6766 

1 

7.7127 

l 

8.7574 

1 

9.8094 

l 

9.0370 

2 

8 . C 769 

2 

12.00 

2.9203 

1 

4.0*43 

1 

5.2233 

1 

6.4342 

1 

7.6647 

1 

8 . 9080 

l 

1C .1598 

1 

11.41 79 

1 

l 1.2424 

2 

1 0 , C 54 l 

2 

15,00 

3. 191* 

1 

4.6063 

1 

6.0890 

l 

1 

7. 6074 

1 

9.1463 

1 

10.6979 

l 

12.2578 

i 

i 3 .82 32 

1 

14.5630 

2 

13.0 349 

? 

17.00 

3.3708 

1 

4.9323 

1 

6.6683 

8. 3915 

1 

10.1353 

L 

1 1.8913 

1 

13.6551 

1 

15.4243 

1 

16.7807 

2 

1 5 . C 2 7 3 

2 

20.00 

3.6*01 

1 

5.6495 

1 

7.5412 

1 

9.5710 

1 

11.6208 

1 

13.6822 

1 

15.7508 

1 

1 7 .8243 

1 

19 .90 LO 

1 

1 3 . C 1 9 8 

2 

25.00 

*.0920 

t 

6.5035 

] 

9.0051 

l 

l 1 . 5442 

1 

14.1019 

I 

16.6699 

1 

1° . 2 44 3 

1 

21.8227 

1 

24.40*0 

1 

23.0127 

2 

30.00 

*.5*93 

1 

7.4667 

l 

10.^775 

I 

13.52*1 

l 

16.5B77 

1 

19.6606 

1 

22.7399 

l 

25.8208 

1 

28.905 1 

1 

2 8 . C 0 8 8 

2 

35.00 

5.0 1 19 

1 

8.4371 

1 

1 1.9560 

1 

15.5C87 

1 

19.0769 

1 

22.6533 

1 

26.2 346 

1 

29 . 3 190 

l 

33.4055 

1 

33.0065 

2 

*0.00 

5. *792 

1 

9.4129 

1 

1 

13.4390 

l 

17.4966 

1 

21.568* 

l 

25.6*75 

l 

29.7310 

l 

33.8173 

1 

1 

37.9055 

1 

33 .0050 

2 

*5.00 

5.9507 

1 

1C. 3930 

14.9252 

1 

19.4869 

I 

24.C615 

1 

28.6*28 

l 

33.2281 

1 

37.8159 

42.4054 

1 

*3 . CC 39 

2 

50.00 

6. *257 

1 

11 . 3763 

I 

16.41 33 

L 

21.4739 

1 

26. 5559 

1 

31.6390 

i 

36.7257 

1 

41.8147 

1 

*6.9052 

1 

43 . CO 32 

2 


ADHESIVE-BONDED SCARF JOINTS (ELASTIC ANALYSIS) 

NON-DIMENSIONAL IZFD FORMULATION 

THERMAL MISMATCH COEFFICIENT = 1.000 FOR TENSION, = -l.COO FOR COMPRESSION 

0 » BOTH ENDS EQUALLY LOADED 

AVERAGE SHEAR STRESS / MAXIMUM SHEAR STRESS , 1 * SOFT ET END CRITICAL 

2 3 STIFF ET END CRITICAL 


SCALED 

L/T 

RATIO 

0.0 

0.1 

1.00000 

2 

0.2 

1 .00000 

2 

0 . 3 

1 .OG0CC 

2 

EXTENSIONAL'ST IFFNESS (THICKNESS) RATIO 
0.4 0.5 0.6 0. 7 

l.OOOCO 2 l. 00000 2 l.OOCOO 2 l.OOOOO 2 

0.3 

1.00000 

2 

0.9 

1.00000 

2 

1.0 

1.00000 

2 

0.20 

0.91603 

2 

0.91323 

2 

0.91C96 

2 

C. 90883 

2 

0.9C707 

2 

0.9055* 

2 

0.90*20 

2 

0.90301 

2 

0.90 194 

2 

0. 9C099 

2 

0.50 

0.8*393 

2 

0.33225 

2 

9.81355 

2 

C. 80708 

2 

0. 79735 

2 

0. 78898 

2 

C. 78171 

2 

0.7 75 3* 

2 

0 • 76971 

7 

0 • 76*70 

2 

1.00 

0.90116 

2 

0.9 3009 

2 

0.7765 3 

2 

0. 73^71 

2 

0.701 16 

2 

0.67365 

2 

0.65C67 

2 

0 .6 31 20 

? 

0.61449 

2 

0. 6CCC0 

2 

1.20 

0.98775 

2 

0.87725 

2 

C . 79801 

2 

0. 73342 

2 

C. 69196 

2 

0.65*75 

2 

0.62*26 

2 

0.59833 

2 

0.57729 

2 

0.55882 

2 

1.50 

0.92538 

1 

l.COO CO 

2 

0. 86776 

2 

C. 77430 

2 

0 . 7 : * 7 7 

2 

0.65101 

2 

0.60823 

2 

C. 5733 7 

2 

0.5*442 

2 

0. 52C00 

2 

1.70 

0.87*00 

1 

0.95*06 

1 

0.93616 

7 

0.81511 

2 

0. 72779 

2 

0.6618* 

2 

0.61028 

2 

0.56838 

2 

0.53491 

2 

0 . 5C fc 5 3 

2 

2.00 

0.80360 

1 

0.93920 

1 

0.97265 

l 

0.89497 

2 

0. 778C6 

2 

0.69251 

2 

C. 62723 

2 

C. 5753 1 

2 

0.53*26 

7 

0 . 5CC 0 0 

2 

2.50 

0.705*2 

1 

0.7959? 

1 

0.88575 

1 

0.97474 

l 

0.88544 

7 

0.7660* 

2 

0.67771 

2 

C . 60976 

2 

0.55590 

2 

0.51219 

2 

3.00 

0.62796 

1 

0.72061 

1 

0.31366 

1 

0.90685 

1 

l .coocc 

2 

0.3*875 

7 

C. 73902 

2 

0.65588 

l 

0.59078 

2 

0. 53846 

2 

4.00 

0.51660 

1 

0.610*0 

1 

0. 70606 

1 

0.80309 

1 

0.901 16 

l 

1 .00000 

2 

0.8565* 

7 

0 . 74928 

2 

0 .66 6 1 9 

2 

C.6C000 

2 

5.00 

0.4*169 

1 

0.53543 

l 

0.63194 

i 

C.73C50 

1 

0.83061 

l 

0.93192 

1 

0.9503* 

1 

C. 82669 

2 

0.73113 

2 

C.65517 

2 

6.00 

0.38831 

1 

0.43131 

1 

C. 57870 

1 

0. 678 J2 

1 

0.77914 

l 

C. 88161 

l 

0.9851* 

1 

0. 08690 

2 

0.78277 

2 

0. 70000 

2 

8.00 

C. 31778 

l 

0.41102 

1 

0. 5*838 

1 

0.60849 

1 

0. 71 C52 

1 

0.81 390 

1 

0.91328 

1 

0.97046 

2 

0 . B5591 

2 

0 . 76471 

? 

10.00 

0.2735* 

1 

0. 36639 

1 

0.46*6° 

1 

0.56528 

1 

0.66766 

t 

1 

0.77127 

1 

0.3757* 

1 

0.9808* 

1 

0.90370 

2 

0. 80 769 

2 

12.00 

0.2*336 

1 

0.33702 

1 

C .*3523 

1 

1 

0.53610 

1 

0.63873 

0.7*233 

1 

0.8*665 

l 

0.951*9 

l 

0.93686 

2 

0.83784 

2 

15.00 

0.21276 

1 

0. 30709 

1 

l 

0.40593 

0. 5071o 

l 

0.60976 

1 

0.71319 

l 

0.81 718 

t 

A . 92155 

1 

0.97036 

2 

0.86900 

2 

17.00 

0 . 19828 

1 

0.793C8 

0.39726 

1 

C. 49362 

1 

0.5961 9 

1 

0.699*9 

1 

C.8C 32* 

1 

C . 90731 

1 

0.98710 

2 

C. 8d396 

2 

20.00 

0. 18200 

1 

0.277*3 

t 

0. 37 706 

1 

0.47855 

l 

0.53104 

1 

0.60*11 

l 

0.7875* 

1 

0.99121 

1 

0.99505 

1 

0. 90099 

2 

25.00 

0.16368 

1 

0.26014 

1 

0 . 3^020 

l 

0.46177 

l 

0.54409 

1 

0.66680 

1 

0.76977 

1 

0.87291 

1 

0.97616 

1 

0.92051 

2 

30.00 

0.1516* 

1 

0.24389 

l 

0.34975 

1 

1 

C. *50 30 

1 

0. 55292 

1 

0.65535 

1 

C . 75796 

1 

0.86069 

l 

0.96350 

l 

0.93363 

2 

35.00 

0.1*320 

1 

0.24106 

i 

0.34160 

0.4*311 

1 

1 

C . 5 4*5 C 5 

l 

0.6*72* 

t 

0.7*956 

1 

0.95197 

1 

0.95*** 

l 

C. 94304 

2 

*0.00 

0.13698 

1 

0.2 3532 

1 

0.33597 

1 

0. *3742 

0.5392 1 

l 

0.6*119 

1 

0.7*328 

l 

0.8*543 

l 

0.94764 

l 

C. 95012 

2 

*5.00 

0.1322* 

1 

0.23096 

l 

0.33167 

1 

0. 43304 

L 

0. 53470 

1 

0.63651 

l 

0. 73840 

1 

C. 0*035 

1 

0.9*23* 

1 

C • 95564 

2 

50.00 

0.12851 

1 

0.22753 

1 

0.3282? 

1 

0.42958 

l 

0.53112 

l 

0.63278 

1 

0.73*51 

1 

0. 93629 

l 

0.93810 

1 

C. 96006 

2 
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ADHES I VE- BON DEO SCARF JOINTS (CLASTIC ANALYSIS) 
NON-DIMENSIONAL I l ED FORMUL AT I UN 

THERMAL MISMATCH COEFFICIENT - -1.000 FOR TENSION, * 1.000 FOR COMPRESSION 


NON-DIMENSIONAL I 7F0 STRENGTH 


0 * BOTH ENDS EQUALLY LOADED 

1 * SOFT ET FND C« I T (CAL 

2 « STIFF ET END CRITICAL 


0.0 1 
0.1773 l 
0.3464 l 
0.4249 l 
0.4206 1 
0.40 31 1 
0.3399 1 
0.3727 I 
0.3547 1 
0.3492 1 
0.3648- I 
0.4022 1 
0.4521 1 
0.5738 L 
0.7123 1 
0.8610 1 
1.0963 1 
1.2593 1 
1.5104 1 
1.9426 1 
2.3874 l 
2.8417 1 
3.3031 1 
3.7703 1 
4.2420 1 


0.0 l 
0 « 17 7 3 1 
0.3527 1 
C . 45 l 5 1 
C ,4567 t 
0.4535 1 
0.4504 1 
3.4488 1 
0.4593 l 
0.4355 1 
0.5715 l 
0.5861 1 
0.8181 1 
1.1135 l 
1.4343 1 
1.77L2 1 
2.2966 1 
2.6563 1 
3.2062 1 
4.1423 1 
5,0943 1 
6.0533 1 
7.0295 1 
8.0063 1 
8.9872 l 


2.2052 l 
2.7417 l 
3.S7C6 l 
4.1342 L 
4.99^6 l 
6. 4380 l 
7.9C09 i 
9.3735 1 
10.3525 1 

12.3360 1 
13.8226 1 


EXTENS10NAL STIFFNESS ITHICKNFSS) RATIO 


0.0 1 
0.1796 1 
0.3741 1 
0.5548 1 
0.6030 l 
0.6717 1 
0.7210 1 
0.8055 1 
0.978S l 
1.1896 l 
1.6932 l 
2.2661 l 
2.8793 1 
4.1710 1 
5.5077 l 
6.8669 l 
8.9279 1 
10.3102 1 
12.39L1 l 
15.8703 l 
19.3670 1 
22.8479 1 
26.3413 L 
29.8362 t 
33.3323 l 


0.3 


0.4 


0.5 


0.6 


o ,c 

l 

C.O 

1 

0.0 

l 

0.0 

l 

0.1703 

l 

0. 1786 

1 

C. 1790 

l 

0. 1793 

l 

0.^581 

1 

C. 3629 

1 

0.3671 

l 

0.3708 

1 

0.4759 

l 

C.4901 

| 

0.5105 

1 

0.5374 

1 

0 .49^1 

1 

0.5213 

l 

0.5503 

1 

0.5775 

l 

0.50 15 

1 

0.547? 

1 

0.59C7 

t 

0 .6321 

t 

0.5006 

1 

0.5647 

l 

0.6137 

1 

0.6708 

1 

0.5234 

1 

0.5964 

l 

0.6678 

1 

°.7375 

1 

0.5642 

1 

C . 6688 

l 

0.7729 

1 

0 . 8 7 6 3 

1 

0.6241 

l 

0. 7644 

1 

0.9056 

1 

l .0475 

1 

0.7862 

1 

1.0070 

1 

1.2324 

l 

1.4614 

l 

0.9848 

1 

1.2943 

1 

1.6123 

1 

1 *9366 

1 

1 .2053 

1 

1.6093 

1 

2.0245 

1 

2.4405 

l 

l .68 90 

l 

7.2096 

1 

2.9C51 

l 

3.5336 

l 


3.0066 l 
3.7473 1 
4 . R S 3 8 l 
5.6525 l 
6.3162 1 
8.7739 l 
10.7451 1 
12.7243 1 
14.7086 1 
16.6964 1 

18.6366 1 


3.8280 1 
4.7745 l 
6.2195 1 
7.1932 1 
8.6635 1 
11.1297 L 
13.6073 1 
16.0913 1 
18.5795 l 
21.0703 1 
23.5630 1 


5 * B 1 59 1 
7.5691 1 

3.7474 1 
10.5233 1 
13.4966 1 
16.4792 l 
19.4670 l 
22.4581 1 

25.4512 1 
28.4453 1 


0.0 l 
0.1799 l 
0.3771 l 
0.5710 l 
C .6269 1 
0.7094 1 
C • 7694 1 
0.8719 1 
1.0804 1 
1.3317 1 
1.9271 1 

2.5996 l 
3.3155 1 
4.8L51 1 

6.3593 1 
7.9248 l 
10.2929 1 

11.8789 1 

14.2640 l 
I9.24d4 1 

22.2386 1 

26.2321 1 
30.2274 1 

34.2239 I 
33.2212 1 


0.0 1 
0.1800 1 
0.3799 1 
0.5860 1 
0.6494 1 
0.7455 1 
0.3161 1 
0.9367 1 

1.1810 1 
1.4737 l 
2.1629 l 
2.9364 1 
3.7560 1 
5.4643 1 
7.2161 L 
8.9876 1 
U.662 3 1 
13.4516 1 
16.1406 1 
20.6294 1 
25.1228 1 
29.6195 1 
34.1155 1 
38.6133 1 
43.1116 l 


0.0 1 
3.1802 1 
0.3823 l 
0.6000 1 
0.67C6 1 
0.7800 l 
0.8611 1 
1.0000 1 
1.2805 1 
1.6154 1 
2.4000 1 
3.2759 1 
4.2000 1 
6. 1 176 1 
3. 0769 1 
10.0541 1 
13.0349 1 
15.C273 l 
13.0198 1 
23.0127 1 
23.C088 1 
33.0065 1 

38.0050 1 
43.0039 1 

48.0032 1 


ADHESIVE-BONDED SCARF JOINTS (ELASTIC ANALYSIS) 
NON-DIMENSIONAL! 2ED FORMULATION 


THERMAL MISMATCH COEFFICIENT * -1.000 FOR TENSION, 
AVERAGE SHEAR STRESS / MAXIMUM SHEAR STRESS . 


* l.OCO FOR COMPRESSION 

0 = BOTH ENOS EQUALLY LOAOED 

1 = SOFT ET END CRITICAL 

2 * STIFF ET END CRITICAL 


EXTENSI (JNAL STIFFNESS (THICKNESS) RATIO 


l. 00000 
0.88632 
0.69288 
0.4249! 
0.35053 
0.26871 
0.22938 
0.18637 
0.14187 
0.11640 
0.09121 
0.08043 
0.07536 
0.07173 
0.07123 
0.07175 
0.C73C9 
0.07407 
0.07552 
0.07770 
0.07958 
0.08119 
0.08258 
0.08378 
0.08484 


1 1.00090 
1 0. 889 JO 
1 0.70537 
1 0.45156 
1 9.3*056 
l 0.30236 
1 0.26497 

1 9.22442 
1 0. 13374 
1 O.ISIS? 
1 0.14237 
l 0.13722 
1 0.13635 
1 0.13913 
1 0.14343 
l C • 1 4 7 o C 
l C.1531C 
1 0.15625 
1 0.16031 
1 0.16569 
1 0.16933 
l 0.17310 
1 0.17574 
1 0.17792 
1 0.17974 


.cncco 

(.89129 
>.71621 
'. 47686 
. 4G844 
.33435 
/ • ?°9 1 7 
'.26171 
>.22567 
>.20804 
>. 19656 
>.19695 
>.2009 7 
). 211 12 
>.22052 
: .22848 
' . 23304 
: .2431 9 
>.24953 
.25752 
>.2o336 
'.267*1 
.27131 
3 .2 74 1 3 
>.27645 


1 i.OOCOO 
1 G . 8° 3 2 5 
1 C. 72571 
1 C. 498 10 
1 0.43440 
l 0.36479 
1 C. 33217 
1 C. 29821 
1 C. 26752 
1 C. 25479 
1 C. 25175 
1 0.25887 
1 0.26822 
1 0.28609 
1 C. 30066 
l 0.31227 
l 0.32559 
1 0.33250 
l C. 34031 
l 0. 35096 
l 0.35817 
1 0.36355 
1 C. 34772 
l C. 37103 
1 0.37373 


l l.OOOCO 
l 0.09496 
1 0.73410 
1 C. 51854 
1 0.45362 
1 0.39378 
1 0.36396 
1 G. 33380 
1 0.3091b 
1 o:39l07 
1 0.3C310 
1 C. 32245 
1 C. 33741 
1 0.36313 
l 0.38280 
l 0.39788 
1 0.41463 
1 0.42313 
l 0.43317 
l 0.44519 
1 0.45358 
1 0.45975 
1 0.46449 
l C. 46823 
1 0.47126 


1 l.OCCCO 
1 0.89646 
l C. 74157 
1 0.53737 
1 0.48126 
1 0.42141 
1 0.39459 
1 0.36373 
1 0.35051 
1 0.34915 
1 0.36534 
1 0.39733 
1 0.408C8 
1 0.44170 
1 0.46631 
1 0.48466 
l 0.5C461 
1 0. 51*55 
1 0.52617 
1 0.53986 
1 0.54931 
1 0.55620 
1 0.56145 
1 0.56558 
1 0.56892 


1 l.COCOO l 
l 0.89778 l 
1 0.74326 1 
l 0.55480 l 
l 9.5C249 1 
l 0.44777 1 
1 C .424 1 L 1 
l 0.40275 l 
1 0.39153 l 
1 C. 39652 l 
1 0.42329 1 
1 0.45322 l 
1 C. 47988 1 
l 0.52137 1 
1 0.55077 l 
1 0.57224 l 
1 0.59519 1 
1 0.60648 1 
1 0.61955 1 
1 0.63401 1 
1 0.64523 1 
1 0.65280 1 
! 0.65853 1 
l 0.66303 l 
1 0.66665 1 


.00000 
.90003 
.75973 
.58598 
.54116 
.49699 
.40003 
.46837 
.47239 
.49123 
.54072 
.50728 
.62600 
.68304 
.72161 
.74896 
.77749 
. 79127 
.00703 
.92519 
.83743 
.84624 
.85289 
.85807 
.86223 


.00000 1 
.90099 1 
. 76470 1 
. 6COCO 1 
.55882 1 
.52000 1 
.50653 l 
.50000 1 
.51219 1 
.53846 1 
.60000 1 
.65517 1 
. 7CCC0 l 
. 76471 1 
.80769 1 
.83784 1 
.36900 1 
.88396 1 
.90099 1 
.92051 1 
.93363 l 
.94304 1 
. 95012 1 
.95564 1 
.96006 1 
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A. 2 Computer Program A4ED For Lower Bound Elastic-Plastic Strength of Bonded 
Scarf Joints 

This FORTRAN IV digital computer program covers a simple efficient approximate 
solution for the elastic-plastic strength of most bonded scarf joints of prac- 
tical proportions and materials. Its development was needed as a sufficiently 
close starting point for convergence to proceed in the more precise program 
A4EE. It transpired, on examination of the equivalent results computed by A4EE 
that the quicker computations of A4ED were satisfactory as final answers pro- 
vided that (1) and adhesive non-linear behavior was not negligible, i.e., that 
Y p /Y e > (2) the thermal mismatch coefficient is not too high, i.e., that 

ctherm < 2, and (3) that the stiffness mismatch between adherends be not too 
great, i.e. , that 0.2 < etr 5 l. 

The input data for program A4ED is precisely the same as for program A4EE with 
the exception that y p /Y e for the adhesive cannot be equal to zero for A4EE. 

In other words, perfectly elastic adhesive behavior must be excluded from A4EE. 
On the other hand, the values computed by A4ED for zero adhesive plasticity are 
unduly conservative. 


A listing of the program and sample outputs follow. 


on ion o ooo nemo r» oooo 


COECK A4 C D 

C ELASTIC-°LAST IC ANALYSIS OF UNBALANCED SCARF JOINTS 
C LOWER BO'JND ANALYSIS PROVIDED WHICH IS ACCURATE FOR DESIGN 
C NON-DINENSIONALIZED AVERAGE SHEAR STRESSES COMPUTED 
C NON-O I MENS I ON AL I ZED JOINT STRENGTHS COMPUTED 
C RANGE OF ADHESIVE OUCTILITIES INCLUDED 

C RANGES OE ADHERENO STIEFNESS AND THERMAL IMBALANCES ACCOUNTED FDR 

C DATA PRESENTATION FOR TENSILE SHEAR LOADING 

C CHANGE SIGN OF CTHERM TO USE FOR COMPRESSIVE SHEAR LOADS 

C SET CTHERM .EQ. 0. ANO REPLACE ADHEREND E T, S WITH GT'S FOR IN-PL ANF 

C I (EDGEWISF) SHEAR LOADING 

C 

C DIMFNSION OL(J). ETRIKI, CTHFRM(I), GPOVGE(L), AIN), TRATIOI J, NCRTND) , 
C l TAUAVG(J,K), ICRTNOIJ.K), STRGTH C J , K) , THERMCt NCRTND) , 

C 2 VRI NCRTND), VUI NCRTND ) , VLINCRTND) , OLTRNTI NCRTND) , 

C 3 OLTRNCI NCRTND) , TRANSL(K) 

DIMENSION 0L(40), FTR(IO), CTHERM! 20 ) , GPOVGE 120), A<50), 

1 TR AT I 0 < 40 , 2 ) , T AU A VG ( AD , 10 ) , STRGTHl 40 , 10 ) , ICRTNDI AO, 10 ) , 

2 THERMCI2), VR ( 2 ) , VU(2), VLI2), OLTRNTI 2 ) , 0LTRNCI2), TR ANSL ( 10 I 
C 

C READ IN INPUT DATA 

C READ IN ARRAY SIZES 

READ (5,10) IMAX, JMAX, KM AX , LMAX, NMAX 
10 FORMAT (515) 

C IMAX .LE. 20, JMAX .LE. AO, KMAX .LE. 10, LMAX . LE. 20, 

C 1 NMAX .LE. 50 .AND. .GE. 10. 

C READ IN NON-OIMENSIONALIZED OVERLAP ARRAY 
DL(l) = 0. 

OLIJ) MUST BE IN ASCENDING ORDER 

31(2) MUST BE LESS THAN 0.2 FOR IDENTIFICATION OF CRITICAL END 
l O c JOINT OF ZERO OVERLAP (LIMITING CASE) 

OLIJ) .LT. 100. FOR COMPATIBILITY WITH FORMAT STATEMENTS A70 t 590 
READ 15,20) (OLIJ), J = 2, JMAX) 

NOTE JMAX ONE MORE THAN INPUT VALUES ON CARD(S) 

20 FORMAT I 12F6. 2) 

READ IN STIFFNESS IMBALANCE ARRAY 

IDENTIFY ADHERENDS SUCH THAT ETR(K) = (ET)1/(ET)2 .LE. 1. 

STIFFNESS RATIOS SHOULD BE IN ASCFNDING OR DESCENDING ORDER 
ETRIK) SHOULD INCLUDE VALUE 1. BUT MUST EXCLUOE VALUE 0. 

READ 15,30) ( FT R ( K J , K » 1, KMAX) 

30 FORMAT (10F5.2) 

R FAD IN NON-OIMENSIONALIZED THERMAL MISMATCH COEFFICIENTS 
CTHERM .PR3PNL. ( AL PHA l 2 ) - ALPH A I I ) ) * ( OPER A T I NG TEMP. - CUPE TFMP . ) 

NFEO CTHERM! I) ARRAY TO CONTAIN BOTH POSITIVE AND NEGATIVE VALUES 
1 TO COVER BOTH TENSILE AND COMPRESSIVE LOADS 
READ (5,40) (CTHERM!!), I = l, IMAX) 

40 FORMAT ( 10F7.3) 

READ IN PLASTIC-TD-ELASTIC STRAIN RATIO ARRAY 
GPOVGE ( L ) MUST BE .GT. 0. FOR ELASTIC-PLASTIC ANALYSIS 
PURELY FLASTIC SOLUTION OBTAINED FPOM SEPARATE PROCEDURE 
READ (5,50) ( GPOVGE ( L ) ♦ L = 1, LMAX) 

50 FORMAT ( 14E5.2 ) 


OVERLAPS) 
(OLIJ), J 


JMAX) 


IMBALANCES) 

K = 1, KMAX) 


PRINT OUT INPUT DATA 

WRITE (6,60) IMAX, JMAX, KMAX, LMAX. NMAX 
60 FORMAT (1H1, PH I«AX = ,12, PH JMAX = ,12, PH 
1 PH LMAX = ,12, PH NMAX = ,12) 

WRITE (6,70) 

70 FORMAT (10H OVERLAPS) 

WRITE (6,90) (OLIJ), J = I, JMAX) 

90 FORMAT ( 12F6.2) 

WRITE (6,90) 

90 FORMAT (22H STIPFNESS IMBALANCES) 

WRITE (6,100) (ETR(K), K = 1, KMAX) 

100 FORMAT ( 14E5.2 ) 

WRITE (6,110) 

110 FORMAT ( 20H THERMAL MISMATCHES) 

WRITE (6,120) I CTHERM ( I ) , I = 1, IMAX) 

120 FORMAT (10F7.9) 

WRITE (6,130) 

130 FORMAT (34H PLASTIC TO ELASTIC STRAIN RATIOS) 
WR I T c (6,140) ( GPOVGE ( L ) , L = 1, LMAX) 

140 FORMAT ( 14F5. 1 ) 

START COMPUTAT(ONAL DO LOOPS 
DD 620 L = 1, LMAX 
GAMMAR = GPOVGE ( L ) 

ENSURE EXCLUSION DF NEGATIVE PLASTICITY IN ADHESIVE 
IF (GAMMAR .LT. 0.) GO TO 620 
00 620 I = 1, IMAX 
THERMC( l I = CTHERM! I ) 

THERMC( 2) = - THERMC ( 1 » 

DO 350 K = l, KMAX 


KMAX = 


IMAX) 


I ERROR IN DATA) 


VRI 1) 
VR( 2) 
VUI 1 ) 
VL( l) 
VUI 2) 


FTR( K ) 

L. / VR( 1) 
1 . - VR (1) 
l. ♦ VR ( 1 ) 
l. - VR ( 2 ) 
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VL ( 2 ) = 1. ♦ VR ( 2 ) 

SPECIAL PROCEDURE FOR PURELY ELASTIC ADHESIVE JOINT 
IF (DAMMAR . GT . 0* ) GO TO 160 

ZERO TRANSITIONAL LENGTH FOR PURE L Y-El A ST I C JOINTS 
TRANSL(K) « 0* 

DO 150 J = 2, JM AX 
OLAP = OL ( J > 

00 150 NCRTN0 = l, 2 


C SET 


150 


TR ATI0( J, NCRTNO) =1. 
GO TO 270 


A4 ED08 C 0 
A4ED0900 
A4ED0°10 
A4FD0920 
A4EQ0930 
A4ED0940 
A4C00950 
A4FD0960 
A 4 ED 0970 


- VU(NCRTND) ♦ VL(NCRTNO)*THERMC(NCRTND)/OLAPA4EOO9R0 

A4ED0990 


ESTABLISH TRANSITIONAL OVERLAPS FROM PUL L Y-°L AST I C TO ELASTIC-PLASTIC 
l BEHAVIOUR AS REFERENCE L FNGTH FOR START OF ITERATIONS 
SPECIAL PROC FOUR E FOR LESS THAN COMPLETELY UNBALANCED JOINTS 
160 IF ( (THERMC(l) • EQ • 0.) .AND. ( VR ( L) . EQ. 1.) ) GO TO 170 

IF (THERMC(l) . EQ. 0.> GO TO 1 BO 
IF (VR( l ) .EQ. 1. ) GO TO 1 p 0 
IF NONF 0 C THESE, JOINT CONTAINS BOTH IMBALANCES 
GO TO 200 

“ OVERLAP FOR IDENTICAL ADHFP ENDS 


SET 

170 


I N c I N I T c TRANSITIONAL 
OLTRNT(l) = 1000000. 


SET 

IN 


CL TRMT( 2 > = 1000000. 
OLTRNC(l) = 1000000. 
OL TRNC ( 2) = 1000000. 
GO TO 210 

TRANSITIONAL OVERLAPS 
THE ABSENCE OF THERMAL 


1 TENSILE 
180 IF ( VU( 1) 


FOR STIFFNESS IMBALANCE ONLY 
MISMATCH, SAME END IS CRITICAL F0° 


SET 

190 


IF 

IF 

IF 

IF 

IF 

IF 

IF 

GO 


( VU( 1) 
< VIM 2) 
( VU( 2) 

( vum 

l VU(1) 
( VU( 2) 
( VU<2) 
TO 210 


SHEAR AND COMPRESSIVE SHEAR LOADING 
.GT. 0.) OLTRNT(l) * SQRT (GAMMAR *VL! 1 I /VU( l) ) 
.LE. 0.) OLTRNT(l) * 1000000. 

.GT. 0.) OLTR NT ( 2 ) = SQRT( GAMMAR *VL < 2 ) / VU( 2 ) ) 

.LE. 0.) OL TR NT( 2 ) = 1000000. 

.GT. 0.) OLTRNC(l) = SORT (GAMMAR *VL<l)/VU(l) I 
.LE. 0.) OLTRNC(l) = 1000000. 

.GT. 0.) OL TRNC ( 2 ) = SQRT ( GAMMAR*VL( 2 ) /VU ( 2) ) 

.LE. 0.) OL TRNC ( 2 ) = 1000000. 


BOTH 


TRANSITIONAL OVERLAPS 


IF (THERMC(l) .LT. 0.) 

IF (THERMC(l) .GE. 0.) 

IF ( THER MC ( 2 ) .LT. 0.) 

IF ( THER MC ( 2 ) .GE. 0.) 

IF ( THER MC ( 1 ) .GE. 0.) 

IF ( THE 0 MC ( 1 ) .LT. 0.) 

IF ( THE R MC ( 2 ) .GE. 0.) 

IF ( THEP MC ( 2 ) .LT. 0.) 

GO TO 210 
200 CONTINUE 

STANDARD PROCEDURE FOR COMPLETELY UNBALANCED JOINTS 
VI = THERMC(l) * V L ( 1 ) / (2. * VU(1M 

V2 = THERMC ( 2 ) * VL < 2 1 / (2. * VU(2)> 

V3 = Vl*Vl ♦ GAMMAR*VLC 1I/VUC1) 

V4 = V?*V2 + GAMMAR*VL ( 2 ) / VLM 2 ) 

ESTABLISH TRANSITIONAL OVERLAPS BELOW WHICH JOINT 


FOR THERMAL 
OLTRNT! 1 > 
OLTRNTI 1 ) 
OLTRNT ( 2 ) 
OLT°NT( 2) 
OLTRNC ( 1) 
OL TRNC ( 1 ) 
OLTRNC< 2) 
OLTRNC! 2) 


MISMATCH ONLY 
-GAMMAR/THERMC( 1 ) 
1000000 . 

-GAMMAR/THERMC( 2) 

1000000 . 

GAMMAR /THERMC ( 1 ) 

1000000 . 

GAMMAR/THERMC( 2) 

1000000 . 


IS FULLY PLASTIC 


NEXT FOUR STATEMENTS APPLY FOR TENSILE SHEAR LOADING 
IF ( V3 .GE. 0.) OLTRNT(l) = VI ♦ SORT ( V3) 

IF NOT, OTHER END OF JOINT CRITICAL 

OTHER END OF JOINT IDENTIFIED AS CRITICAL BY SHEAR STRAIN GRADIENT 
SET INFINITE TRANSITIONAL OVERLAP TO ACCOUNT FOR THIS 

IF ( ( V3 .LT. 0.) .OR. ( OLTRNT ( 1 ) .LE. 0.) ) OLTRNT ( 1 ) = 1000000. 
IF (V4 .GF. 0.) OLTRNT ( 2 ) = V2 ♦ $QRT<V4) 

IF NOT, OTHFR END OF JOINT CRITICAL , . 

OTHER END OF JOINT IDENTIFIED AS CRITICAL BY SHEAR STRAIN GRADIENT 
SET INFINITE TRANSITIONAL OVERLAP TO ACCOUNT FOR THIS ^ _ 

IF ( <V4 .LT. 0.1 .OR. ( OLTRNT ( 2 ) .LE. 0.) ) OLTRNT (2> =1000000. 
IF ICRTND .EQ. 2 FOR SHORT OVERLAPS » OLTRNT ( 1 ) WILL BE COMPUTED VERY 
l LARGE. AND VICE VERSA 


A4 ED 1000 
A4E01010 
A4ED1020 
A4ED1030 
A4ED1040 
A4ED1050 
A4 ED 1060 
A4ED1070 
A4ED10R0 
A4ED 10 Q 0 
A4ED1100 
A4ED1110 
A4EDU20 
A4ED1130 
A4ED1140 
A4EDU50 
A4ED1160 
A4ED1 170 
A4ED1 L90 
A4ED1190 
A4ED1200 
A4 ED 12 10 
A4 ED 1220 
A4ED1230 
A4 ED 1240 
A4ED1250 
A4ED1260 
A4ED1270 
A4ED1280 
A4 ED 1 2 90 
A4ED1300 
A4EDL310 
A4 ED 132 0 
A4ED1330 
A4FD1340 
A4 ED 135 0 
A4ED1360 
A4 ED 1370 
A4ED1380 
A4 FD 1390 
A4E01400 
A4ED1410 
A4 ED 1420 
A4E01430 
A4ED1440 
A4ED1450 
A4ED1460 
A4ED1470 
A4ED1480 
A4ED1490 
A4ED1500 
A4ED1510 
A4ED1520 
A4ED1530 
A4ED1540 
A4ED1550 
A4E01560 


THIS IS PHYSICALLY REALISTIC AND DOES NOT LEAD TO IMPOSSIBLE COMPUT INGA4E01570 
IF BOTH V 3 AND V4 ARE POSITIVE, EITHER OLTRNT ( l ) DR OLTRNT ( 2 ) WILL BE A4E01580 

1 COMPUTED NEGATIVF. NEED TO PREVENT COMPUTATIONS BASED ON THIS 

2 UNREAL SITUATION. HENCF CHECKS ABOVE AND BELOW 
NEXT FOUR STATEMENTS WOULD APPLY FOR COMPRESSIVF SHEAR LOADING 

IF ( V3 .GE. 0.) OLTRNC(l) * -VI ♦ SQRTCV3) 

IF NOT. OTHER END 0* JOINT CRITICAL _ 

OTHER END OF JOINT IDENTIFIED AS CRITICAL BY SHEAR STRAIN GRADIENT 
SET INFINITE TRANSITIONAL OVERLAP TO ACCOUNT FOR THIS 

IF ( ( V3 .LT. 0.) .OR. ( OLTRNC ( l ) .LE. 0.) ) OLTRNC ( 1 ) ■ 1000000. 

IF ( V4 .GF. 0.) OLTRNC! 2 ) = -V2 + SORT ( V4) 

IF NOT, OTHER END OF JOINT CRITICAL „ 

OTHER END OF JOINT IDENTIFIED AS CRITICAL BY SHEAR STRAIN GRADIFNT 
SET INFINITE TRANSITIONAL OVERLAP TO ACCOUNT FOR THIS 


IF ( ( V4 .LT. 0.) .OR. ( OLTRNC ( 2 ) .LE. 0.) ) OLTRNC!/) = 1000000. 

210 DO 260 NCRTND = 1, 2 
SET UNIFORM STRESS FOR SHORT OVERLAPS 
DO 220 J = 2, JM AX 
JSAVE * J 


A4ED1590 
A4ED1600 
A4FD1610 
A4ED1620 
A4ED1630 
A4ED1640 
A4ED1650 
A4ED1660 
A4E01670 
A4ED16B0 
A4EDI690 
A4ED1700 
A4ED1710 
A4ED1720 
A4E01730 
A4ED1740 
A4FD1750 
A4 EDI 760 


75 


IF (OL(J) • GT • OLTRNT ( NCRTND ) ) GO TO 230 A4E01770 

IF NOT « JOINT IS FULLY PLASTIC A4FD1780 

220 TRATIO(J»NC Q TNO) * i. A4ED1790 

IF ( J S AVt .FO. JMAX) GO TO 260 A4E01900 

A4ED 18 10 

COMPUTE JOINT STRENGTH FOR ELASTIC-PLASTIC AOHESTVE BEHAVIOUR A4E01820 

230 00 250 J * JSAVFf JMAX A4ED1830 

OLAP = OL < J ) A4ED1840 

0LAP2 * OLAP * OLAP A4E01950 

COMPUTE AOVERL FOR MINIMUM VALUE OF TAVOTP BY ITERATION A4ED1860 

SET INITIAL ESTIMATE OF EXTENT OF PLASTIC ZONE FROM TRANSITIONAL OLAP A4ED1870 


/ OLAP 


AOVERL = OLTRNTI NCR T N0> 

00 240 N * 1» NM AX 
ARMOR = l. - AOVERL 

AOVERL = -ARMDR*ALOG( ARMOR ) ♦ (GAMMAR 
1 0LAP2 - THERMCINCRTND)*1LAP) ) 

IF (AOVERL . GT • 0.999) AOVERL = 0.999 
IF (AOVERL .LT. 0.001) AOVERL = 0.001 
240 CONTINUE 

TRATTO(JfNCRTND) = 1. 

IF (AOVERL .GT. 0.9999) GO TO 250 
COMPUTE CORRESPONDING AVERAGE SHEAR STRESS 

TRATIOU. NCRTND) = 1. - ( VL ( NCRTND) *GAMMAR/0LAP2 ♦ ( VL ( NCRTND ) * 
l THFRMCf NCRTND) /OLAP - VU(NCRTNDII * AOVERL) / AL0G( ARMOR ) 

250 CONTINUE 
260 CONTINUE 

VALUES COMPUTED ARE NOW STORED IN TRATIOIJ t NCRTND) 

2*0 DO 340 J = 2 1 JM AX 
OLAP * OL ( J ) 

TAUl = TRATIO(Jfl) 

TAU2 = TRATI0(J»2) 

IF ( {TAUl .LT. 1.) .OR. (TAU2 .LT. 1.) > GO TO 280 
IF SOf JOINT IS NOT FULLY PLASTIC 

IF NOT. IDENTIFY CRITICAL END OF JOINT FROM SHEAR STRAIN GRADIENT 
GRADNT = THERMO ( 1 ) - OLAP*VU( l) /VL ( 1 ) 

ICRTNO(J.K) = l 


ICRTNO(JtK) = 0 
I CR TND ( J t K ) * 2 


1 

0 

2 


IF (GRADNT .LT. 0.) 

IF (GRADNT .EQ. 0.) 

IF (GRADNT .GT. 0.) 

TAUAVG(JfK) = 1. 

STRGTH(J t K) - OLAP 

TRANSITIONAL OVERLAPS ALREADY COMPUTED FOR ELASTIC ADHESIVE 
BYPASS RECOMPUTATION. THIS APPLIES TO ELASTIC-PLASTIC ADHESIVES 
IF (GAMMAR .EQ. 0.) GO TO 340 
MCRTNO = ICRTND(J.K) 

IF (MCRTNO .EQ. 0) MCRTND = 1 
TRANSL(K) * OLTPNT( MCRTND) 

GO TO 340 

280 DIFFNC = TAUl - T AU2 
IF DIFFNC .LT. 0.» NCRTND .EQ. 

IF DIFFNC .EQ. 0., NCRTND .EQ. 

IF DIFFNC .GT. O.t NCRTND .EQ. 

IF (DIFFNC )290, 300. 310 
ADHEREND (I) END OF JOINT CRITICAL 
290 TAUAVG(J,K) * TAUl 

STRGTH ( J » K ) = TAUl ♦ OLAP 
ICRTNO(J.K) = 1 

COVER SITUATION WHERE TRANSITIONAL LENGTH IS LESS THAN 0L<2> 

IF (J .EQ. 2) TRANSL(K) = OLTRNT ( l ) 

GO TO 320 

BOTH ENDS OF JOINT EQUALLY CRITICAL FROM NULLIFYING (OR ZERO) 
l ADHEREND IMBALANCES 
300 TAUAVG(JtK) * TAUl 

STRGTH ( J t K ) = TAUl * OLAP 
I CRTND( J t K ) = 0 

COVER SITUATION WHERE TRANSITIONAL LENGTH IS LESS THAN 0L<2) 

IF (J .EQ. 2) TRANSL(K) * OLTRNT(l) 

GO TO 320 

AOHEREND (2) END OF JOINT CRITICAL 
310 TAUAVG(JtK) = TAU2 

STRGTH( J » K) = TAU2 * OLAP 
ICRTND(J.K) * 2 

COVER SITUATION^ WHERE TRANSITIONAL LENGTH IS LESS THAN OL ( 2 ) 

IF (J .EQ. 2) TRANSL(K) = OLTRNT ( 2 1 
COVER CASES OF ZERO OR NEGATIVE ESTIMATED STRENGTHS 
320 IF (TAUAVG(J.K) .GT. 0.) GO TO 330 
IF NOT ♦ JOINT HAS BROKEN DUE TO THERMAL STRESSES WITHOUT EXTFRNAL L0ADA4ED2530 

TAUAVG(JtK) * 0. A4ED2540 

STRGTH(J.K) * 0. A4E02550 

GO TO 340 A4ED2560 

330 IF (TAUAVGCJtK) .LE. i.l GO TO 340 A4ED2570 

IF NOT. THERE HAS BEEN A COMPUTATIONAL MISTAKE A4E0258D 

PRINT ASTERISKS TO IDENTIFY ERROR A4ED2590 

RERUN WITH GREATER VALUE OF NM AX A4ED2600 

TAUAVG( J t K ) * 100. A4E02610 

STRGTH(J*K) * 1000. A4E02620 

340 CONTINUE A4ED2630 

350 CONTINUE A4EQ2640 


A4ED1BB0 
A4E01 9°0 
A4EDI900 

{ (VU (NCR TND)/VL( NCRTND) )* A4ED19I0 

A4ED1920 
A4E01930 
A4E01940 
A4ED1950 
A4ED1960 
A4FD19T0 
44E0I980 
A4ED1990 
A4ED2000 
A4ED2010 
A4E02020 
A4ED2030 
A4ED204Q 
A4ED2050 
A4ED2060 
A4ED2070 
A4ED2080 
A4F02090 
A4ED2100 
A4ED21 10 
A4ED2120 
A4ED21 30 
A4ED2140 
A4ED2150 
A4ED2I60 
A4ED2170 
A4ED2180 
A4E02190 
A4ED2200 
A4ED2210 
A4ED2220 
A4ED2230 
A4ED2240 
A4E02250 
A4ED2260 
A4ED2270 
A4ED2280 
A4E92290 
A4ED2300 
A4ED23 10 
A4ED2320 
A4E02330 
A4ED2340 
A4ED2350 
A4ED2360 
A4E02370 
A4ED2380 
A4ED23 90 
A4ED2400 
A4ED241 0 
A4ED2420 
A4ED2430 
A4ED2440 
A4E02450 
A4E02460 
A4ED2470 
A4ED2480 
A4ED2490 
A4E02500 
A4E02510 
A4E02520 
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SET UNIFORM STRESS FOR ZERO OVERLAP 
DO 360 K = L, K«AX 
T AUAVG (UK) = 1. 

STRGTH< l f K) = 0. 

360 fCRTNO(UK) = ICRTND(2,K) 

HENCE MEED FOR 0L(2) TO BE SMALL ENOUGH TO BE LESS THAN THAT AT WH 

1 NCR TND CHANGES 

END OF COMPUTATIONS. START PRINTING OUT OF TABULATED RESULTS 

PRINT OUT AVERAGE STRESS HEADING 
WRITE ( 6# 3 7 0 ) 

370 FORMAT (lHl/, 5I1H0/U 27X, 56 HA ONES I VF -BONDED SCARF JOINTS ( 
ITTC-PLASTIC ANALYSIS)/, 

2 39X , 3 1 HNON-D I ME NS I ON AL I 7 EO FORMULATION/) 

IF (GAMMAR .NE • 0.) GO TO 390 

WRITE (6*380) 

380 FORMAT ( 1H0, *2X, 2 3HPUR ELY ELASTIC ADHESIVE) 

GO TO *10 

390 WRITE (6, *00) GAMMAR 

*00 FORMAT ( 1H0 * 27X* 49HPLASTIC TO ELASTIC ADHESIVE SHEAR STRAIN R 
l = , F5.2) 

*10 IF (CTHFRM(l) .NE. 0.) GO TO *30 
WRITE (6, *20) 

*20 FORMAT ( 1H * 3?X, 33HZFR0 THERMAL MISMATCH COEFFICIENT) 

GO TO *50 

*30 WRITE ( 6 , **0 ) THERMC(l), THERMC(2) 

**0 FORMAT (1H , 16X, 31HTHERMAL MISMATCH COEFFICIENT = , E6.3, 

1 17H FOR TENSION, = , F6.3, 16H FOR COMPRESSION) 

*50 WRITE (6, *60) (ETR(K), K = 1, KMAX) 

*60 FORMAT! 1H0* 67X* 30H0 = BOTH ENDS EQUALLY CRITICAL/, 20X, 

1 72H AVER A GE SHEAR STRESS / MAXIMUM SHEAR STRESS , l = SOFT 

2ND CRITICAL/, 6PX, 25H2 * STIFF ET END CRITICAL/. 

3 8H0 SCALED, 31X, 39HE XTE NS I ONAL STIFFNESS (THICKNESS) RATIO/ 

* 7H L/T/, 7 h RATIO, F7.l t 9F10.L/, IH ) 

WRITE OUT TABULATIONS OF AVERAGE BOND STRESSES 
DO *80 J = U J M A X 

WRITE (6, *70) OLU), ( l TAUA VG ( J , K ) , I CRTND ( J , K ) ) , K * It KMAX) 
*70 FORMAT (LH , F6.2, 2X , 10(F7.5, IX, II, IX)) 

*80 CONTINUE 


20X , 
SOFT 

RATIO/ 


KMAX) 


PRINT OUT JOINT STRENGTH HE AD I NG 
WRITE (6**90) 

*90 FORMAT ( 1 H l / , 5(LH0/), 27X , 56H ADHES I VE-BONDED SCARF JO I 
1TIC-PLASTIC ANALYSIS)/, 

2 39X , 31 HNON-D I MENSIONALIZEO FORMULATION/) 

IF (GAMMAR „NF. 0.) GO TO 510 

WRITE (6,500) 

500 FORMAT ( l HO * *2X, 23HPUR ELY ELASTIC ADHESIVE) 

GO TO 530 

510 WRITE (6,520) GAMMAR 

520 FORMAT ( I HO , 27X, 49HPL A ST I C TO ELASTIC ADHESIVE SHEAR ST 

1 = , F5.2) 

530 IF (CTHERM(I) .NE . 0.) GO TO 550 
WRITE (6,5*0) 

5*0 FORMAT ( 1H ♦ 37X, 33HZERP THERMAL MISMATCH COEFFICIENT) 
GO TO 570 

550 WRITE (6,560) THERMC ( 1 ) , THE R MC ( 2 ) 

560 FORMAT I 1H , 16X, 31HTHFRMAL MISMATCH COEFFICIENT = , F6 
1 17H FOR TENSION, = , ^6.3, 16H FOR COMPRESSION) 

570 WRITE ( 6, 5 RO ) (FTR(K), K - l , KMAX) 

580 FORMAT ( 1H0, 67X, 30H0 = BOTH ENDS EQUALLY CRITICAL/, 

1 72HN0N-0TMFNSI0NALIZED JOINT STRENGTH . 1 = 

2ND CRITICAL/, 68X, 25H2 = STIFF FT END CRITICAL/. 

3 RHO SCALED, 31X, 39HE X TENS I ONAL STIFFNESS (THICKNESS) 

* 7 h L / T/ , 7H RATIO, F 7. 1 , 9F10.1/, IH ) 

WRITE OUT TABULATIONS OF JOINT STRENGTHS 
DO 600 J * l, J M A X 

WRITE (6,590) OL ( J ) , ( ( STR GT H ( J , K ) , I CR TND ( J , K ) ) , K = 1, 
S90 FORMAT ( IH , F6.2, 2X, L0(F7.*, IX, II, IX)) 

600 CONTINUE 

WRITE OUT TRANSITIONAL JOINT STRENGTHS 

WRITE (6,610) (TRANSL(K), K = 1, KMAX) 

610 FORMAT (RHO TRANSL, IX, 100=7.*, 3X1) 

620 CONTINUE 

WRITE (6.630) 

630 FORMAT (lHl, 1 8H PROGRAM COMPLETED) 

STOP 

END 


NTS ( 


RAIN R 


20X , 
SOFT 

PATIO/ 


KMAX) 


A*ED2650 
A*ED2660 
A*E02670 
A4ED2680 
■ A*ED2690 

A*ED2700 
ICH A*ED2710 
A*ED 2720 
A*ED2730 
A*ED27*0 
A*ED 2750 
A*ED2760 
A*ED2770 
EL AS A*ED 2780 
A*ED2790 
A*ED2800 
A*E028 i 0 
A4ED2820 
A*E02830 
A*ED 28*0 
A*ED2850 
ATI 0A*E02 860 
A* ED 28 7 0 
A4ED2880 
A*E02890 
A*ED2 900 
A*E02910 
A*ED29 20 
A*ED2930 
A*ED 29*0 
A*ED2950 
A*ED2960 
ET EA*E02970 
A*ED2980 
, A*E02990 

A*ED3000 
A*ED 30 10 
A*ED 302 0 
A4ED3030 
A*ED3 0*0 
A4ED3050 
A* ED3060 
A4ED3070 
A4E03080 
EL A S A*ED 3090 
A* ED 3 1 00 
A4ED3U0 
A* ED 3 1 2 0 
A4ED3130 
A* ED 3 1 *0 
A4ED3150 
A4ED3160 
AT I 0 A*ED 3 1 7 0 
A4ED3180 
A4ED3190 
A4ED3200 
A*ED 32 1 0 
A4ED3220 
A4FD3230 
A4ED32 *0 
A *ED 32 50 
A4ED3260 
A4ED3270 
ET EA4ED3280 
A4ED3290 
, A4ED3300 

A4ED331 0 
A4E03320 
A4ED3330 
A* ED33*0 
A*ED3350 
A4ED3360 
A4ED3370 
A4ED3380 
A4ED3390 
A4ED3400 
A4ED3410 
A 4ED3420 
A4ED3430 
A4E03440 
A4ED3450 
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AOHESI VE-BdNDEO SCARF JOINTS ( EL A S T l C-PLAST ! C ANALYSIS! 
NDN-DI.MFNSH1NAL ! 2 ED FORMULATION 


PLASTIC TO FIASTIC AOHC$IVF SMEAR STRAIN RATIO * 5.0 f 

THERMAL MISMATCH COFFF If I FNT * 1.000 r OR TENSION, = -1,000 e UR COMPRESSION 


SCALED 

t/T 

RATIO 

0.0 

0.20 

0.50 

1.00 

1.20 

1.50 
1.70 
2.00 

2.50 

3.00 

4.00 

5.00 

6.00 

0.00 

10.00 

12.00 

15.00 

17.00 

20.00 

25.00 

30.00 

35.00 

40.00 

45.00 

50.00 


0 . I 

0.0 

0.2000 
0.5000 
1 .0000 
1.2000 


2.0000 

2.5000 

3.0000 


5.7213 

6.0556 


7.6363 


9.1630 


NON-DIMENSIONAL I ZEO JOINT STRENGTH t 


0 * BOTH FNDS FQUAILY CRITICAL 

1 * SOFT ET END CRITICAL 

2 » STIFF FT FNO CRITICAL 


FXTENS I ONAL STIFFNESS (THICKNESS) RATIO 


0.2 


0. 3 


0.4 


2 

0.0 

2 

0.0 

2 

0.0 

7 

2 

0.2400 

2 

0.2000 

2 

4.2000 

2 

7 

0.5000 

7 

0.5000 

7 

0.5000 

?. 

2 

l .0000 

2 

l .0000 

i? 

1 .0000 

7 

2 

1.2000 

2 

1.2000 

2 

1 .2000 

2 

1 

1 .5090 

0 

1 .5000 

2 

1 .6000 

2 

1 

1.7000 

l 

l .7000 

2 

1 .7 000 

2 

1 

2.4000 

l 

2.0000 

1 

? . cooo 

2 

l 

2.5400 

1 

2. 5000 

1 

2.5000 

1 

1 

3. COCO 

1 

3.0000 

1 

3 . 0040 

1 

1 

3.9980 

l 

4.0004 

l 

4.0000 

1 

l 

4.7445 

l 

4.7374 

l 

4.9984 

1 

l 

4.7275 

1 

6.2104 

l 

6.6279 

1 

l 

5.3297 

l 

4.055? 

l 

6. 7246 

1 

t 

5. 8486 

1 

6.7956 

1 

7.691 7 

1 

1 

6.3243 

1 

7.454? 

1 

8 . 4 9 M5 

l 

l 

7.0028 

1 

3.4752 

1 

9.9427 

l 

1 

7.4334 

1 

7.1 166 

1 

10.7510 

l 

1 

8.073? 

1 

10.0676 

l 

12.0046 

1 

l 

9.1229 

1 

11.6144 

1 

14.0647 

1 

1 

10. 1 574 

1 

13.1484 

l 

16.1044 

l 

l 

11.1731 

1 

14.6728 

1 

18.1325 

l 

l 

12.1331 

1 

16. 1 907 

l 

23. 1535 

1 

1 

13.1993 

1 

17.7044 

1 

22.1 696 

1 

i 

14.2075 

1 

19.2150 

1 

24.1824 

1 


TRANSL 3.1576 


3.5R95 


4.1142 


4 . 7761 


0.5 

0.0 

0.2000 
0.5000 
) .0000 
I .2000 

1.5000 
1 . 700C 
2.0000 

2. 5000 

R • 0000 0 

4.0000 1 

5.0000 l 
4.9085 l 
7.322? 1 
8.5245 1 
9 . 6 4 ? 6 1 

11.2764 1 

12.3334 l 
13.3065 1 
16.4670 1 
19.0133 1 
7 1.646 2 I 
24.0707 1 

24.5894 l 
29.1069 1 

5.6533 


0.6 
0.0 

0. 2000 
0.5000 
1 .0000 
l . 2000 
1 . 5900 
1 . 7000 
2 .O0C0 
2.4000 
■*.0000 

4.0000 0 
5.000C 1 

6.0000 1 
7.9959 l 
9.2490 I 

10.6237 l 
12.5302 l 
13.8491 1 

l e: .7?Sl 1 
1°.H093 1 

21.9645 1 
2^.9034 1 
2 7.9324 1 

30.9649 1 

33.9727 1 

6.3990 


0. 7 

0.0 2 
0.2000 2 
C.5000 2 

i.oeoo ? 
1.2000 2 
1.4000 2 
1.7400 2 
?.O n OO 2 
2.5000 2 

3.0000 2 

4.0000 2 

5.0000 7 

6.0000 ! 
8 • O n OO 1 
9.9987 1 

11.4914 1 

13.790? 1 

1 5 . 26 3 7 1 

17.4641 l 
21.0690 1 
24.6371 1 

R8.1843 1 

31.7201 l 

35.2474 1 

39.7691 1 

R • 3633 


0.9 


0.0 

0.2000 

0 .5000 

1 .0000 
l .2000 
l .4000 
l . 7000 
2.0000 
2 .5000 

3.0000 

4.0000 

5.0000 2 

6.0000 2 

9.0000 2 

10.9000 1 
12.0000 1 
14.7760 1 
16.5094 1 
19.0473 1 
23.1924 l 
27.2839 1 
31.3471 l 
35.3995 1 
39.4293 1 

43.4570 1 

12.5777 


0.9 

r.o 

0.2040 
0.5930 
1 .0000 
1 ,20or 
1 .5300 

1 .7900 
2.0000 
?. 4 nr ;0 

3.0030 

<♦ .0000 
6 . 0^00 
, goon 
8 .0000 
10.0090 
12.0000 
16.0000 
17.0000 
20.0900 - 
24.7L54 1 

29.6204 1 

34.734? I 
38.3154 1 
47.3747 1 

47.9209 1 

23 . 1 106 


1.0 

0.0 

0.2000 
0.S09C 
l .0000 
I .2000 

1.5000 
1.7000 
2 . 00 CO 

2.5000 

3.0000 

4.0000 
S.9009 
4 . QORO 
7 , 9 R 2 4 
9.6264 

11 .4188 
14.3908 
L6. 3217 
19.236? 
24. 1230 
29.0372 
33.9683 
38.9126 
43.9654 
48.9249 

5.0000 


AOHFSI VE-BCNOSO SCARF JOINTS I P L A $ T l C- p L A ST I C ANALYSIS) 
NON- 01 MENSICNAL 1 ZEO FORMULATION 


thermal 


PLASTIC T9 ELASTIC 
MISMATCH COEFFIC [FNT 


ADHESIVE SHEAR STRAIN RATIO = 5,0 

= 1.000 FOR TENSION, * -1.000 FOR 


COMPRESS t ON 


AVERAGE SHEAR STRESS / MAXIMUM SHF A R STRESS 


0 * ROTH ENOS EQUALLY CRITICAL 

1 * SOFT FT FN n CR IT ICAL 

2 * STIFF FT ENO CRIT If.A! 


SCALED 







EXTENSIONAL STIFFNESS (THICKNESS! RATIO 




L/T 

RATIO 

0.1 


0.2 


0.3 


0.4 


9.5 


0.6 


9.7 


0.3 


9.9 

0.0 

1 .00000 

? 

1.00000 

2 

1.00009 

2 

! .OOOOO 

2 

1.09909 

2 

1.90000 

2 

1 .09009 

2 

1.00009 

2 

1 .00040 

0.20 

1 .00000 

? 

l. OOOOO 

2 

1 .00000 

2 

1.00000 

2 

l .90040 

2 

1.09000 

2 

1 • OOOCO 

7 

1.40049 

2 

l . 99000 

0.50 

1.00000 

2 

1 .roooo 

2 

1 .00000 

2 

1.0000c 

7 

l . 3000C 

2 

1 .00000 

? 

l * OOCOO 

2 

1 . OOOOO 

2 

1 • 90000 

1.00 

1.00900 

2 

1. onooo 

2 

l. OOOOO 

2 

1 . 40000 

2 

1.90000 

2 

1 .00900 

? 

1.90004 

7 

1 . oooc 4 

2 

1 .94000 

t.2C 

1.00000 

2 

1.04000 

2 

1.00000 

7 

1 . 00090 

2 

1 . oooco 

2 

l.COOOO 

? 

1 .00900 

2 

1.00004 

2 

L .90990 

1.50 

1.00000 

1 

1.00000 

c 

l .04000 

7 

I ."9049 

2 

1 • 9 9 9 ~ 0 

2 

l . OOOOO 

2 

l .OO0OC 

2 

1 . OOCOO 

7 

l • 90000 

1.70 

l .C0009 

l 

l . OOOOO 

l 

1 .90000 

2 

1 . OOOOO 

7 

1 .coono 

2 

1 . OOOOO 

7 

1.00040 

7 

1 . 90094 

? 

l . 90090 

2.0C 

1 .ocooo 

1 

l. OOOOO 

1 

1.00900 

I 

1 . coo"o 

7 

1 • 909 CO 

2 

1 .00009 

2 

1 .00000 

2 

l . OCOOO 

? 

L . 30409 

2.50 

1 .00000 

1 

1.00009 

1 

l .00900 

l 

1.00904 

X 

1 .00990 

2 

1 . 90000 

2 

1 .900CC 

7 

1 . 00099 

? 

1.90090 

3.00 

l .nnooo 

l 

1 . OOOOO 

1 

1 .00000 

1 

1 . 00009 

l 

1 .00090 

0 

1 .00009 

2 

1 .09999 

2 

1 . 00900 

2 

1.90900 

4.0C 

0.90110 

1 

0 . 99950 

1 

1 . OOOOO 

1 

1 .00900 

l 

1.00000 

1 

1 . 90000 

0 

1 .40000 

2 

l .00090 

2 

l • 0090 0 

5.00 

0.707?? 

l 

0. 86999 

l 

0.94743 

1 

0.99968 


1 .00009 

t 

l .00090 

l 

1 .00990 

? 

l .00 400 

2 

1 . 00004 

6.00 

0.69695 

l 

0. 78725 

l 

0.8684? 

1 

0. 93 79P 

1 

0.99976 

1 

1 .00040 

l 

l .00090 

L 

1 .onooo 

7 

1 . 4000 0 

B. 00 

0.56956 

l 

0.64671 

1 

0. 76*96 

1 

0.34070 

l 

0.91527 

1 

0,998^4 

1 

1.00909 

l 

l .00900 

2 

l . 09 400 

10.00 

0.48582 

t 

0.48436 

l 

0.67966 

l 

0. 7491 7 

1 

0. 35245 

l 

0.92690 

1 

0.99937 

1 

1.00090 

1 

1 .000)0 

12.00 

0.42707 

t 

0. 52719 

1 

0.62335 

l 

0.71654 

1 

9. 304 7 9 

l 

0.8867? 

1 

0.95630 

t 

1 , 04000 

1 

l . 90040 

15.00 

0.36604 

1 

0.46686 

1 

0.56502 

l 

0.6601 8 

l 

0.75176 

1 

9. 33868 

1 

0.91863 

l 

0. 9°6Q 7 

l 

1 . 09940 

17.00 

0.336SS 

1 

0.43756 

l 

0.53627 

l 

0.63241 

1 

0. 72549 

l 

9. 8 1445 

l 

0.39814 

1 

0.97114 

1 

1 • 90000 

20.00 

0.30278 

l 

0.40391 

1 

0.50313 

1 

9.69023 

1 

0.69 48 3 

1 

0.78625 

1 

9.37321 

1 

0.96237 

l 

l . OOOOO 

25.00 

0.26377 


0.36491 

l 

0.46458 

1 

0.54259 

l 

0.45368 

1 

0.75237 

l 

0. 84274 

1 

0.9277) 

l 

9 . ">9 14 ? 

30.00 

0.23732 

l 

0. 33841 

1 

0.43829 

L 

0.53681 

1 

0.63379 

1 

0.72332 

l 

0.82124 

1 

0. 90°46 

l 

0.4373S 

35.00 

0.21820 

l 

0.31923 

1 

0.41922 

l 

0.51 997 

1 

0.61561 

1 

0.71 163 

t 

0.34S28 

1 

0.8956 3 

l 

9.97810 

40.00 

0.2037? 

1 

0. 30470 

1 

0.40477 

l 

0. 50384 

1 

0.591 77 

1 

0.69331 

l 

0 . 79 300 

l 

0 . 384 34 

l 

0. 97044 

65.00 

0.19239 

1 

0.29332 

l 

0.39343 

1 

0.49266 

1 

9.49083 

1 

0.68788 

1 

0.73323 

1 

0. 37629 

1 

0.9638° 

50.00 

0.18326 

l 

0.28415 

l 

0.38430 

1 

0. 4*365 

1 

0.5921 9 

1 

0.67945 

1 

0.77533 

l 

0.86914 

1 

0.96840 


1.0 


1.00009 ? 
1.00400 2 

1. 00000 ? 
1.00300 2 
1.00009 ? 

l.rooco ? 

1.00004 2 
1.39930 ? 

1. 00000 2 
1.00030 2 
1.90000 2 
l. OOOOO 2 
0.9)967 2 
O.Q 7789 2 
0.94266 2 
0.95990 2 
0.95939 ? 
0.94010 2 
0.96176 2 
0.96492 2 
0.96791 ? 
0.97054 ? 

0.972R7 2 
0.97479 ? 
0.97650 2 
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AO HE SI VC- BONDED SCARF JOINTS < EL AS T I C-P LAST I C ANALYSTS! 
NON-OI MFNStONAL I ZEO FORMULATION 


SCALFO 

L/T 

RATIO 

0.0 
0.20 
0.50 
1.00 
1 .20 

1.50 
1.70 
2.00 

2.50 

3.00 

4.00 

5.00 

6.00 
e.oo 

10.00 

12.00 

15.00 

17.00 

20.00 

25.00 

30.00 

35.00 

40.00 

45.00 

50.00 


PLASTIC TO ELASTIC AOHFSIVF SHFAP STOft I N ft AT 1 0 = 5.0 

THERMAL MISMATCH CO EFFICIENT = -1.000 FOR TENSION. » 1.000 F rift C. 0“ r K t Sal "N 


1 


NON-OIMENSIflNAL l ZED JOINT STRENGTH 


0 = BOTH ENOS EQUALLY CRITICAL 

1 = SOFT E-T FNO CHIT ICAL 

2 = STIFF FT ENO CRITICAL 


0. I 

0.0 
0.2000 1 
0.5000 1 
1.0000 I 
L.2000 l 
1.5000 t 
1.7000 1 
1.9971 l 
2.4966 1 
2.250? I 
2.3992 l 
2.5200 l 
2.6306 l 
2 .8403 l 
3.0443 l 
3.2442 t 
3.5475 1 
3.74*8 1 
4.0480 l 
4.5473 1 
5.0446 1 
5.5387 1 
6.0292 l 
6.5159 1 

6.9990 1 


0.2 


0.0 l 
0.2000 1 
0.6000 l 

1 .0000 I 
1 .2000 1 
1.5000 1 
1.7000 t 

2 .0000 1 

2.6 96 5 1 
2.4413 1 
2.6877 1 

2.9045 1 
3.1114 1 
3.5159 1 
3.9160 1 
4 . 3 l 5 1 1 
4.9134 1 
5.3123 1 
5.9109 1 
6.9096 l 
*,005* * 


8.9012 1 


TRANSL 1.9354 


9.9940 
10.9839 
11 .3708 

2.0895 


FXTENSIONAL STIFFNESS (THICKNESS) RAT IU 


0. 3 

0.0 l 
0.2000 1 
0,5000 1 

1 

1 
1 
1 
1 


1 .0000 
l .2000 
1 .6000 
1.7000 
2.0000 
2.496° 1 

2.9946 l 
2.9539 l 
3.2669 l 
3.6670 l 
4.165C l 
4.7601 l 
6.3564 1 
6.2499 l 
4.9469 1 

7.7433 l 
9.2386 


1 10.7347 1 


12.2304 
13.7748 
15.2171 
14.707 1 

2.2570 


0.4 

0.0 ! 
0.2000 1 
0.5000 1 
1 .0000 1 
1.2000 l 
1.5000 l 
1.7000 l 
>.0000 1 
2.4971 1 

2.9Q68 1 
3.1978 1 
3.6023 l 
3.9992 L 
4.7871 1 

6.6757 i 
6.3666 1 

7.5559 l 
*.3502 l 
9.6436 l 
1 1 .6356 1 
13.6298 l 
15.5247 l 
17.5195 l 
19.5134 t 
21.5067 l 

7.4427 


0.6 


0.6 


n.o i 

0.7000 1 
0.5070 1 

1.0000 l 

1.2000 l 

1.5000 1 
1.7000 l 

2.0000 1 

2.5000 l 

2.9970 1 
3.4186 1 
3.9155 l 
4 . 4044 1 
5.3806 1 
,6.3609 1 
7.3455 1 
8.828? 1 
9 . p l 94 1 

11.3090 1 
13.7964 1 

16.2974 1 
18.7803 1 
21.2750 1 
23.7692 1 

26.2429 l 

2.6533 


0.0 1 
0.2000 1 
0.5000 1 

1.0000 t 

1.2000 l 

1.5000 L 
1.7 COC 1 

2.0000 1 

2.5000 1 

2.997? 1 
3.9719 1 
4.202? 1 

4.7817 1 
5.9430 1 
7 . 1127 l 
8.2393 1 

10.0432 1 
l 1 . 250 t l 
13.0345 l 
16.0153 1 
19.0027 1 
21.9930 l 
24.9854 1 
27. 9788 1 

30.9727 ' 

2. 99Q0 


0.7 

n.o 

l 

0.8 
n ,o 

1 

0.9 

0.0 

0.2000 

1 

0.2000 

t 

0.2000 

0 . 5000 

1 

0.5000 

l 

0.5000 

l .0000 

1 

1 .0000 

l 

1 .0090 

I .2000 

1 

1 .2000 

1 

1 .2000 

1 .5000 

1 

1 .6000 

1 

l . 5000 

1 .7000 

1 

1 .7000 

1 

l .7000 

2 .0000 

l 

2 .0000 

1 

2.0000 

?.50pn 

1 

2.5000 

l 

2.5000 

3.0000 

1 

3.0000 

1 

7 .0000 

7.9971 

l 

3 .9974 

1 

4.0000 

4.4605 

1 

4.9977 

1 

4.9976 

6.12 84 

l 

5.4400 

1 

5.9975 

S .4707 

1 

6,9574 

l 

7.3933 

7 .8262 

l 

8.4939 

l 

9.1 026 

9.1921 

t 

10.0450 

l 

10.8718 

11.2*47 

1 

12.7903 

1 

13.4511 


17.6351 l 
14.7123 1 
19.1961 l 
21.4660 1 

25.1519 1 
23.6410 l 
32.132? 


1 35.624* t 
3.1967 


13.9624 l 

l 4 . *29? 1 17.9489 l 

20.2891 1 
24.2608 l 
28.2393 l 

32.2236 1 
36.2104 1 
40.2001 1 


3.5777 


22.7970 
*4.7525 l 
11.2190 1 
36.6929 1 

40.1718 l 
44.6646 1 

4.1107 


i.O 

0.0 1 
0.2000 1 
0.5000 1 


1.000^ 
1.2000 
1.5000 1 
1.7000 1 
2.0000 1 
2.6000 1 

3.0000 l 

4.0000 1 

5.0000 1 
6.9990 l 
7.9824 1 
9.6266 1 

11.5139 1 

14.7909 ' 

16.3217 

19.275? 

24.1230 

29.0372 

37.9499 

79.9126 

47.9654 1 

48.8249 1 

5.0000 


AOHES l VE- RONOEO SCARF JOINTS (ELASTIC-PLASTIC ANALYSIS! 

U NHN-OI MENS! ON AL f ZED EMULATION 

PLASTIC TO ELASTIC ADHFSIVF SHEAR STRAIN * Ar ! n = r om o * <r t c I HM 

y HER m AL MISMATCH COEFFICIENT * -1.000 FOR TENSION* = 1.000 FOR COMPRESSION 

0 = ROTH ENDS P QU ALL Y CRITICAL 

AVERAGE SHEAR STRESS / MAXIMUM SHEAR STPESS , 1 * SOFT ^ E T y E Nj^CR J f \\ ? \ { 


SCALED 

L/T 

RATIO 

0.0 

0.1 

1 .00000 

l 

0.2 

1.00090 

1 

0.3 

1 .00000 

1 

FXTENSIONAL STIFFIS 
0.4 0.5 

1.00009 1 l. OOOOO 

0.20 

l .00000 

1 

l .nnooo 

1 

1 .ocooo 

l 

1 . OOOOO 

1 

1 .00000 

0.50 

1.00000 

l 

l .00000 

l 

1 .00000 

L 

1 .OOOOO 

L 

1 .0 3090 

1 .00 

1 .00000 

1 

1 .nccoo 

1 

1. ooooo 

l 

1 .00090 

l 

W90000 

1.20 

1 .00000 

1 

1 .00000 

l 

1 .00000 

i 

1 .ocono 

1 

l .09000 

1.50 

l .00000 

1 

1.00000 

1 

1.00000 

1 

1 .00000 

1 

1 . OOOOO 

1.70 

i. ooooo 

1 

1 .00000 

t 

! .00000 

1 

1.00000 

l 

1 . 90000 

2.00 

0.99R55 

1 

l .00000 

l 

1 .00000 

1 

1 .00900 

1 

l 

1 .00000 

?.50 

0.99866 

1 

0.9937? 

1 

0.99378 

1 

0.99884 

l .00090 

3.00 

0. 75007 

l 

0.81377 

1 

0.99997 

1 

0.99893 

1 

0.99900 

4.00 

0.59979 

1 

0.6719? 

1 

0. 77847 

1 

0.79044 

1 

0 .85466 

5.00 

0.50400 

l 

0.59091 

1 

0.6*711 

! 

0. 720*6 

l 

0 . T 8*09 

6.00 

0.43843 

l 

0.51860 

1 

0.59465 

1 

0.66653 

l 

0.73406 

ft. 00 

0.35504 

1 

0.47948 

1 

0.52062 

1 

0. 59*^8 

1 

0.67257 

10.00 

0.30443 

1 

0.391 40 

1 

0.47601 

1 

0.55757 

l 

0.63609 

12.00 

0.27051 

1 

0. 35959 

l 

0.44630 

1 

0.53054 

1 

0.6121 7 

15.00 

0.23659 

l 

0.32756 

1 

0.41666 

1 

0.5037? 

1 

0.53855 

17.00 

0.22046 

i 

1 

0.31249 

1 

0.40276 

1 

0.49119 

l 

0.57761 

20.00 

0.20240 

0.29554 

l 

0.38716 

l 

0.47718 

l 

0.56545 

25.00 

0.18189 

1 

0. 27634 

1 

0.36954 

1 

0.46147 

l 

0.55186 

30.00 

0.16815 

1 

0.26352 

l 

0. 35782 

1 

0.45099 

1 

0.5429* 

35.00 

0.15825 

l 

0. 25432 

1 

0.34944 

l 

0.44356 

t 

0.53659 

40.00 

0. 15073 

1 

0. 2473 5 

l 

0. 3431? 

l 

0. 47 799 

1 

0.5 3 187 

45.00 

0. 144B0 

1 

0.24187 

1 

0.37816 

1 

0.43363 

1 

0.52320 

50.00 

0.13998 

1 

0. 23742 

L 

0.33414 

1 

0.43011 

i 

0.52526 


0.6 

l .00000 

1. 00000 
l .3^000 

1.00000 
1.00000 
1.00000 
l .00000 
1 .00000 
l .00000 
0.99907 
0.99297 
0. °4043 
0. 79696 
0.74288 
0.71127 
0.69077 
0.67038 
0.66177 
0.65172 
0.64043 
0.63347 
0.62837 
0.62463 
0.62175 
0.41945 


l 1 
l l 


0.7 

.00000 1 


l 1 
l l 
l 1 
1 l 
1 1 
l 0 


1 0 
1 0 
l 0 
1 0 
t 0 
l 0 
l 0 
l 0 

1 o 

l 0 


00^00 
no 900 
0000 ? 
oooon 1 

090 O r ! 1 
00000 l 
00003 l 
00900 l 
OOOOn i 
99929 t 
39209 l 
3 5 4 7 7 1 
90897 l 
*826 2 l 
74601 l 
75028 l 
74724 1 
7356? I 
72740 l 
72220 1 
71867 l 
71602 1 

71405 1 
71250 l 


0.8 


0.9 


1.0 


l. OOOOO 

l 

1 . OOOOO 

l 

l .OOOOO 

l 

1 .OnoGO 

l 

1.00900 

l 

1 . ooooo 

l 

1.00009 

l 

1 • 00 n?0 

l 

l .00090 

1 

1.00009 

l 

l .90000 

l 

1.00000 

l 

1 .00000 

1 

t .00090 

l 

1 .00000 

1 

1 . 000 nn 

1 

1 .OOPno 

l 

l .00000 

1 

1.00000 

l 

1 .90000 

l 

l .00090 

l 

1.0000 9 

1 

1 .OOCOO 

l 

l .00000 

1 

1 .00000 

l 

1 .nnooo 

l 

1 .00000 

l 

l .09000 


l .OOOOO 

l 

l .00099 

1 

0.09935 

1 

l .09000 

1 

l .00000 

1 

0. >0944 

l 

0.9O95? 

l 

1 .00000 

1 

0.90666 

l 

0.99958 

l 

9.99Q67 

1 

0. 86968 

1 

0.92416 

l 

0.99739 

l 

0.84933 

l 

0.91026 

1 

0.96266 

1 

0.83703 

l 

0.90265 

l 

O.osooq 

1 

0.8260? 

1 

0.89674 

1 

0.95939 

1 

0.82132 

l 

0. 8946 7 

1 

9 . 9o0 10 

l 

0.81646 

1 

0.8929* 

1 

9.96176 

1 

0. 81156 

l 

0.80188 

1 

0.96492 

1 

0. 80860 

1 

0. 89 L 75 

l 

0.96*9 l 

1 

0.80685 

l 

0. 39197 

1 

0.97054 

V 

0.80559 

1 

0. H9?3? 

1 

0.9728? 

l 

0. 80468 

t 

0.892^1 

1 

0.974*9 

1 

0.80400 

1 

0. 39309 

1 

0.97650 

1 
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A. 3 Computer Program A4EE For Elastic-Plastic Strength of Bonded Scarf Joints 

This FORTRAN IV digital computer program provides for the precise series solu- 
tion for the average shear stress on bonded scarf joints with small scarf 
angles. It accounts for adherend stiffness and thermal imbalance as well as 
adhesive plasticity. The governing analysis is presented in Sections 3 and 4. 
This program A4EE will not handle perfectly elastic adhesives for which the 
program A4EC was developed. Severe convergence difficulties were encountered 
in the development of the numerical program. This contributed to the omission 
of a solution for the adherend and adhesive shear stress distributions. Whether 
or not the adherend allowable stresses are exceeded can be determined simply by 
evaluating the ratio of the adhesive peak shear stress to the adherend allowable 
direct stress. If this ratio exceeds the tangent of the scarf angle, the scarf 
angle is too small and the tip will either break off or be yielded depending on 
the nature of the adherend material. 

The input data required to operate program A4EE is as follows. 

CARD 1 : 

FORMAT (515) 

IMAX = Number of thermal mismatch coefficients. IMAX .LE. 20. 

JMAX = Number of non-dimensional ized overlaps. JMAX .LE. 40. 

(Note that this is one more than the number of overlaps to be read 
in. The limiting case of 0L(1)=0 is set by the program.) 

KMAX = Number of adherend stiffness imbalances. KMAX .LE. 10. 

(Note that this controls the number of answers printed across the 
page and cannot be increased indefinitely for a single pass through 
the program.) 

LMAX = Number of plastic-to-elastic adhesive shear strain ratios. 

LMAX .LE. 20. 

NMAX = Number of terms in power series. 10 .LE. NMAX .LE. 50. 

(Note NMAX = 20 is recommended.) 
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CARDS 2, 2A, 2B, etc.: 

FORMAT (12F6.2) 

OL(J) = Non-dimensional ized overlaps. Number restricted to 40 by dimen- 
sion statement. (Note that 0L(J) must be read in in ascending 
order and that 0L (2 ) , which is the first entry on card 2, must 
not exceed 0.5 because of internal computations. 0L(1 ) = 0 is 
set by the program as a limiting case.) Values of 0L(J) exceed- 
ing 50 are impractical ly large. 

CARDS 3, 3A, 3B, etc.: 

FORMAT (10F5.2) 

ETR(K) = Adherend stiffness ratios (Extj )/(E 2 t 2 ) . 

Number of values restricted to 10 by dimension statement. 

(Subscripts 1 and 2 must be identified such that o < etr(k) £ l. 

Array should be read in in ascending or descending order.) 

CARDS 4, 4A, 4B, etc.: 

FORMAT (10F7.3) 

CTHERM(I) = Adherend thermal mismatch coefficients in non-dimensional ized 
form. Number restricted to 20 by dimension statement. (Note 
that equal and opposite values must be read in consecutively 
to account for the difference between tensile and compressive 
application of the shear load. Values up to ±5 are suffi- 
cient for the available range of adhesives and adherends. 
Greater values are usually associated with failure of the 
joint under residual thermal stresses alone.) 

CARDS 5, 5A, 5B , etc. : 

FORMAT (14F5.2) 

GPOVGE(L) = Ratio of adhesive plastic-to-elastic strain ratios. Number of 
entries restricted to 20 by dimension statement. (Value of 
zero, for elastic case, is rejected by program A4EE to prevent 
breakdown of the computational sequence, but accepted by 
A4ED. ) 
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A complete listing and sample outputs follow. The output tables come in pairs 
with the ratio of the average to maximum adhesive shear stress (x /t ) and the 

6LV P 

non-dimensional i zed joint strength (x /x )(A£) as functions of the adherend 

av p 

extensional stiffness ratio etr = Eit 1 /E 2 t 2 1 l horizontally and the non- 

dimensional i zed joint overlap xi = J ~(— — + ■ - W vertically. Each table 

^nyEjt! E 2 t 2 / 

is prepared for a single value of thermal mismatch coefficient 

(a 2 - cq )ATX 

ctherm = — — — r- and equal and opposite values are treated in turn to 

P\Eiti E 2 t 2 ] 

cover both tensile and compressive shear loadings. Each table is prepared for 
a single value of the plastic-to-elastic adhesive shear strain ratio y /y . 

^ P 6 

The quantity trarsl listed at the foot of each column of the non -dimension - 
alized strength table defines the transitional overlap at which the adhesive 
behavior changes from fully-plastic to elastic-plastic. 
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r>oor> 


CDECK A4EE 

C ELASTIC-PLASTIC ANALYSIS OF UNBALANCED SCARF JOINTS 
C PRECISE SOLUTION, NOT LOWER BOUND 

C NON-DIMENSIONAL IZEO AVERAGE SHEAR STRESSES COMPUTED 
C NON-DIMENSIONAL IZEO JOINT STRENGTHS COMPUTED 
C RANGE OF ADHESIVE DUCTILITIES INCLUDED 

C RANGES OF AOHERENO STIFFNESS AND THERMAL IMBALANCES ACCOUNTED FOR 

C OATA PRESENTATION for TENSILE SHEAR LOADING 

C CHANGE SIGN OF CTHERM TO USE FOR COMPRESSIVE SHEAR LOADS 

C SET CTHERM .EQ. 0. AND REPLACE ADHEREND ET'S WITH GT»S FOR IN-PLANE 

C l I EOGFWISEI SHEAR LOADING 

C 

C DIMENSION OL ( J ) , ETRIK), CTHERM ( I ) , GPOVGEIL), TRATI 01 J ,NCRTNO I , 

C l AIN), TAUAVGI J,<) , STRGTHI J , K ) , ICRTNO(J,K), THERMCI NCRTND) , 

C 2 VRI NCRTND) , VU(NCRTNO), VL I NCRTND) , OLTRNTI NCRTND) , 

C 3 OLTRNC ( NCRTND) , TRANSL(K), TAUENDI N1 ) , SAVOTPIM), TAVOTP(M), 

C A BOVERL(Nl) 

DIMFNSION 0LI40), ETPI10), CTHERMl 20 ) , GPDVGEI20), AI50), 

1 TRATIOI AO, 2) , TAUAVGI AO , 10 ) , STRGTHI 40, 10) , I CRTNDI AO , 10 ) , 

2 THERMC 12), VRI2), VU ( 2 ) » VLI2), 0LTRNTI2), OLTRNC 1 2) , TRANSL(IO), 

3 T AUFNDI 50) , SAVOTPI 50) , TAVOTPI 50) , B0VERLI50) 


READ IN INPUT DATA 
READ IN ARRAY SIZES 

READ IS, 10) IMAX, JMAX, KMAX , LMAX, NMAX 
10 FORMAT 1515) 

IMAX .LE. 20, JMAX .LE. AO, KMAX .LE. 10, LMAX .LE. 20, 

1 NMAX .LE. 50 .AND. .GE. 10. 

READ IN NON— 0 1 MENS I ON AL I ZED OVERLAP APRAY 
OLI l) = 0. 

OLIJ) MUST BE IN ASCENDING ORDER 

3LI2) MUST BE LESS THAN 0.2 FOR IDENTIFICATION OF CRITICAL END 
1 OF JOINT OF ZERO OVERLAP (LIMITING CASE) 

OLIJ) .LT. 100. FOR COMPATIBILITY WITH FORMAT STATEMENTS 550 C 6A0 
READ (5,20) (OLIJ), J = 2, JMAX) 

NOTE JMAX ONE MORE THAN INPUT VALUES ON CARDIS) 

20 FORMAT I 12F6.2) 

READ IN STIFFNESS IMBALANCE ARRAY 

IDENTIFY ADHERENOS SUCH THAT ETRIK) = (ET)1/(ET)2 .LE. 1. 

STIFFNESS RATIOS SHOULD BE IN ASCENDING OR DESCENDING ORDER 
ETRIK) SHOULD INCLUDE VALUE l. BUT MUST EXCLUDE VALUE 0. 

READ (5.30) (ETRIK), K = l, KMAX) 

30 FORMAT I 10F5.2) 

READ IN NON-DIMENSIONAL IZEO THERMAL MISMATCH COEFFICIENTS 
CTHERM .PROPNL . I ALPHA I 2 )-ALPHA( 1 ) ) *( OPERAT ING TEMP. - CURE TEMP.) 
NEED CTHERMl I ) ARRAY TO CONTAIN BOTH POSITIVE ANO NEGATIVE VALUFS 
1 TO COVER ROTH TENSILE AND COMPRESSIVE LOADS 
READ (5, AO) ICTHERMII), I = 1, IMAX) 

AO FORMAT I 10F7.3) 

READ IN PLASTIC-TO-FLASTIC STRAIN RATIO ARRAY 
GPOVGEIL) MUST BE .GT. 0. FOR ELASTIC-PLASTIC ANALYSIS 
PURELY ELASTIC SOLUTION OBTAINED FROM SEPARATE PROCEDURE 
READ (5,50) (GPOVGEIL), L = 1, LMAX) 

50 FORMAT I IAF5.2) 

PRINT OUT INPUT DATA 

WRITE (6,60) IMAX, JMAX, KMAX, LMAX. NMAX 
60 FORMAT (1HL, 9H IMAX = ,12, 9H JMAX = ,12, 9H KMAX * ,12, 

I 9H LMAX = ,12, 9H NMAX = ,12) 

WRITE (6,70) 

70 FORMAT ( 10H OVERLAPS) 

WRITE (6,80) ( OL ( J ) , J = 1, JMAX) 

BO FORMAT < 12F6.2) 

WRITE (6,90) 

90 FORMAT ( 22H STIFFNESS IMBALANCES) 

WRITE (6,100) (ETR(K), K = 1, KMAX) 

100 FORMAT (14F5.2) 

WRITE (6,110) 

110 FORMAT ( 20H THERMAL MISMATCHES) 

WRITE (6,120) ( CTHERMl I ) , I * l, IMAX) 

120 FORMAT (10F7.3) 

WRITE (6,130) 

130 FORMAT ( 34H PLASTIC TO ELASTIC STRAIN RATIOS) 

WRITE (6,140) (GPOVGEIL), L * l, LMAX) 

140 FORMAT (14F5.1) 

STORE CONSTANTS 
ANMAX = NMAX 
All) = l. 

TAUENDI l) = l. 

START COMPUTATIONAL DO LOOPS 
DO 670 L - 1, LMAX 
GAMMAR = GPOVGEIL) 

ENSURE EXCLUSION OF NEGATIVE PLASTICITY IN ADHESIVE (ERROR IN DATA 
EXCLUDE PURELY-ELASTIC ADHESIVE. SFPARATE PROGRAM NEEDED 
IF (GAMMAR .LE. 0.) GO TO 670 
DO 6T0 I = 1, IMAX 


CRITICAL 


JMAX) 


IMBALANCES) 

K = 1, KMAX) 


DATA) 
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THERMCd) = C THERM ! I ) 
THERMCd) * - THERMC! 1) 
00 460 K * It KMAX 
VR(U = ETR ( K 3 


VR(2) * 
VU<1) = 
VL( I) 
VU( 2) 

VL ( 2 ) 


vru) 

VR< 1) 
VR! 1) 
VR (2 ) 
VR d ) 


ESTABLISH TRANSITIONAL OVERLAPS FROM FULLY-PLASTI C TO ELASTIC-PLASTIC 
l BEHAVIOUR AS REFERENCE LENGTH FOR START OF ITERATIONS 
SPECIAL PROCEDURE FOR LESS THAN COMPLETELY UNBALANCED JOINTS 
IF ( (THFRMCU) « EQ e OJ « AND. ( VR < L ) .EQ. 1.1 ) GO TO 150 
IF (THERMCd) .EQ. 0.) GO TO 160 
I<= ( VR ( l ) .EQ* 1.) GO TO 170 
IF NONE OF THESE* JOINT CONTAINS BOTH IMBALANCES 

GO_TQ 1B0 OVERLAP FOR IDENTICAL ADHERENDS 


SFT 

150 


Infinite transitional 

OLTRNT! L) = 1000000. 


SFT 

IN 


OLTRNT I 2) = 1000000. 
OLTRNCd) = 1000000. 
OLTRNCl 2 ) = 1000000. 
GO TO 190 

TRANSITIONAL OVERLAPS 
THE ABSENCE OF THERMAL 


1 TENSILE 

160 if (vum 


FOR STIFFNESS IMBALANCE ONLY 
MISMATCH. SAME END IS CRITICAL FOR BOTH 


SET 

170 


IF 

IF 

IF 

IF 

IF 

IF 

IF 

GO 


(vum 

( VU d ) 
( VU ( 2 ) 
(VUd) 
(VU(i) 
(VU< 2) 
( VU d ) 
TO 190 


SHEAR AND COMPRESSIVE SHEAR LOADING 

• GT. 0.) OLTRNT I 1 ) = SQR T ( G AMM AR*VL (1) / VU Cl) ) 

.LE. 0.) OLTRNT ( 1 ) = 1000000. , m ,, t 

*GT* 0.) OLTRNT! 2 ) * SQRT ( GAMMAR*VL ( 2) /VU( 2) I 
.LE« 0.) OL TRNT ( 2 ) = 1000000. % 

.GT. 0.) OLTRNCd) = SQR T ( GAMM AR *VL < 1) / VU( l ) ) 
.LE. 0.) OLTRNCl 1 ) » 1000000. 

• GT. 0.) OLTRNC ( 2 > - SQR T( GAMM AR* VL ( 2 > / VU ( 2 )) 
.LE. 0.) OLTRNC ( 2 ) = 1000000. 


TRANSITIONAL OVERLAPS FOR THERMAL 


IF (THERMCm . LT* 0.) OLTRNT! 1 ) 

IF (THERMC(l) .GE. 0.) OLTRNT! 1) 

IF ( THERMC ( 2 ) .LT. 0.3 OLTRNT { 2) 

IF ( THERMC ( 2 ) .GE. 0.3 OLTRNT ( 2 ) 

IF < THERMC ( 1 ) .GE. 0.) OLTRNC ( X ) 

IF (THERMCd) .LT. 0.) OLTRNC ( 1 ) 

IF ( THERMC ( 2 3 .GE. 0.) 0LTRNC!2) 

IF (THERMCd) .LT. 0.) OLTRNC! 2 ) 

GO TO 190 

180 CONTINUE . 

STANDARD PROCEDURE FDR COMPLETELY UNBALANCED JOINTS 
VL = THERMCd) * VLd) / (2. * VU(1>) 

V? = THERMC ( 2 ) * VLd) / <2. * VU!2)> 

V 3 = V1*V1 + 0AMMAR*VL(1)/VU< 1) 

V4 = V2*V2 + GAMMAR*VL(2)/VU(2) 

ESTABLISH TRANSITIONAL OVERLAPS BELOW WHICH JOINT 


MISMATCH ONLY 
-GA MM AR/ THERMC! 1) 
1000000 . 

-GAMMAR /THERMC! 2 ) 

1000000 . 

GAMMAR/THERMCC1 ) 

1000000 . 

GAMMAR/THERMCdl 

1000000 . 


IS FULLY PLASTIC 


NEXT FOUR STATEMENTS APPLY FOR TENSILE SHEAR LOADING 
IF { V3 .GE. 0.) OL TRNT ( 1 1 * VI + SQRT(V3> 

IF NOT 9 OTHER END OF JOINT CRITICAL „ „ nAIWCMT 

OTHER END OF JOINT IDENTIFIED AS CRITICAL BY SHEAR STRAIN GRADIENT 
SET INFINITE TRANSITIONAL OVERLAP TO ACCOUNT FOP THIS 

IF ( (V3 .LT. 0.) .OR. ( OLTRNT! 1 ) .LE. 0.) ) OLTRNT ( 1 ) * 1000000- 

IF (V4 .GE. 0.) OLTRNT ( 2 ) = V2 + SQRT!V4) 

IF NOT, OTHER END OF JOINT CRITICAL „ _ 

OTHER END OF JOINT IDENTIFIED AS CRITICAL BY SHEAR STRAIN GRADIENT 
SET INFINITE TRANSITIONAL OVERLAP TO ACCOUNT FOR THIS innnrtftrt 

1= ( <V4 .LT. 0.) .OR. (OLTRNTdl .LE. 0. ) pL T £NT(2)* 1000000 ‘ 

IF ICRTND .EQ. 2 FOR SHORT OVERLAPS, OLTRNT ( 1 ) WILL BE COMPUTED VERY 
1 large, AND VICE VERS& 


A4EE0890 
A4EE0900 
A4EE0910 
A4EE0920 
A4EE0930 
A4EE0940 
A4EE095O 
A4EE0960 
A4EE0970 
A4EE0980 
A4EE0990 
A4EE1000 
A4EE1010 
A4EE1020 
A4EE1030 
A4EEL040 
A4EE1050 
A4EE1060 
A4EE1070 
A4EE1080 
A4EE1090 
A4EE1100 
A4EE1U0 
A4EEU20 
A4EE1130 
A4EEI 140 
A4EE1150 
A4EE1160 
A4EE117J0 
A4EE1180 
A4EE1190 
A4 EE 1200 
A4EE1210 
A4EE1220 
A4EE1230 
A4EE1240 
A4EE1250 
A4EE1260 
A4EE1270 
A4EE1280 
A4EE1290 
A4EE1300 
A4EE1310 
A4EE1320 
A4EE1330 
A4EE1340 
A4EE1350 
A4EE1360 
A4EE1370 
A4F61380 
A4FE1390 
A4 EE 1400 
A4EE1410 
A4EE1420 
A4EE1430 
A4EE1440 
A4EE1450 
A4EE1460 
A4EE1470 
A4EE1480 
A4EE1490 
A4EE1500 
A4E61510 
A4EE1520 
A4EE1530 
A4EE1540 


THIS IS PHYSICALLY REALISTIC AND DOES NOT LEAD TO IMPOSSIBLE , C 2t tpll 
IE BOTH V3 AND V4 ARE POSITIVE, EITHER OLTRNT(l) OR n ^ T gNT(2J WILL BE A4EE1560 

1 COMPUTED NEGATIVE. NEED TO PREVENT COMPUTATIONS BASED ON THIS 

2 UNREAL SITUATION. HENCE CHECKS ABOVE AND BELOW 
NEXT FOUR STATEMENTS WOULD APPLY FOR COMPRESSIVE SHEAR LOADING 

IF T V3 .GF. 0.) OLTRNC! L ) * -VI + SQRT(V3) 

IE NOT, OTHER END OF JOINT CRITICAL „ 

OTHER END OF JOINT IDENTIFIED AS CRITICAL BY SHEAR STRAIN GRADIENT 
SET INFINITE TRANSITIONAL OVERLAP TO ACCOUNT FOR THIS 

IF ( ( V3 .LT. 0.) .OR. (OLTRNC ( 1 ) .LE. 0.) ) OLTRNC(l) * 1000000. 

IP CV4 .GE. 0.) OLTRNCd) = -V2 + SORT ( V4) 

IF NOT, OTHER END OF JOINT CRITICAL „ ^ rnArtTCMT 

OTHER END D c JOINT IDENTIFIED AS CRITICAL BY SHEAR STRAIN GRADIENT 
SET INFINITE TR ANS I TIONAL OVERLAP TO ACCOUNT FOR THIS 

IF ( ( V4 .LT. 0.) .OR. ( OLTR NC! 2 ) .LE. 0.) I OLTRNCm * 1000000. 


190 00 380 NCRTND - l t 2 
THERM = THERMC ( NCRTND ) 

VRREF x VR(NCRTNO) 

VUREF = VU( NCRTND) 

VLREF = VL ( NCRTND) 

C SET UNIFORM STRESS FOR SHORT OVERLAPS 


A4EE1570 

A4EE1580 

A4EE1590 

A4EE1600 

A4EE1610 

A4EE1620 

A4EF1630 

A4EE1640 

A4EE1650 

A4EE1660 

A4EE1670 

A4EE1680 

A4EE1690 

A4EEdOO 

A4EE1710 

A4EE1720 

A4EE1730 

A4EE1740 

A4EE1750 

A4EE1760 
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onnoon o noooo o 


DO 200 J = 2, J M AX 
JSAVE = J 

IF (0L(J> .GT. OLTRNT(NCRTND) > 
IF NOT. JOINT IS FULLY PLASTIC 
300 TRATIOC J.NCRTNO) = I. 

if ( JSAVE . FQ • JMAX) GO TO 380 


GO TO 210 


ELASTIC-PLASTIC ADHESIVE BEHAVIOUR 


( ( VURFE/VLREF)*0LAP2 


COMPUTE JOINT STRENGTH FOR 
210 DO 380 J = JSAVF, JMAX 
OLAP = OL(J) 

OLAP2 = OLAP * OLAP 

COMPUTE AOVERL FOR MINIMUM VALUE OF TAVOTP BY ITERATION 
SET INITIAL ESTIMATE 0 F EXTENT OF PLASTIC ZONE FROM TRANSITIONAL OLAP 
AOVERL = OLTRNT ( NCR TND ) / OLAP 
N2MAX = 2 * NMAX 
DO 220 N = 1 » N2MAX 
ARMOR * l. - AOVERL 

AOVERL = -ARMDR*ALOG( ARMOR) > ( GAMMAR / 

I - THERM * OLAP) ) 

IF (AOVERL .GT. 0.9°99) AOVERL = 0.9999 
IF (AOVERL .LT. 0.001) AOVERL = 0.001 
CONTINUE 

TRATIO(JtNCRTND) = 1. 

IF ( AOVFRL .EO. 0.9Q99) GO TO 230 
COMPUTE CORRESPONDING AVERAGE SHEAR STRESS 

TAUREF = 1. - ( VLREF*GAMMAR/0LAP2 + ( VLR EF+THERM/OL AP - VUREF) * 
l AOVERL) / ALOG( 1. -AOVERL ) 

TRATIO( J , NCR TND) = TAUREF 
CONTINUE 

AREF = AOVERL * 0.999 

FACTOR IS TO PREVENT DIVERGENCE IN THE SFRIES COEFFICIENTS 
MINIMJM POSSIBLE VALUE OF AVOER L » AT WHICH TAVOTP .EQ. 1. 

AMIN = GAMMAR / ( ( VURE F/ VL REF ) *OLA P2 - THERM*OL AP I 
TRUE EXTENT OF FIRST PLASTIC ZONE BOUNDED WITHIN AMIN AND AREF 
ADEL = (AREF - AMIN) / (ANMAX - 1.) 

MINIMUM VALUES OF TAVOTP ARE NOW COMPUTED 


220 


230 

THE 

SET 


THESE APPROXIMATE THE 


1 SOLUTIONS FOR ALL BUT SHORT OVERLAPS OR THICK AOHER ENDS 

2 IN CONJUNCT! 0N_ WITH SEVERE ADHEREND M I $M ATCH AND/OR BRITTLE 


A A EE 1770 
A4EE1780 
A4EE1790 
A4EE1800 
A4EE1810 
A4FE 1820 
A4FE 1830 
A4EE 1840 
A4EF1850 
A4EE1860 
A4EE1870 
A 4EE 1 8 80 
A4EF1890 
A4EE1900 
A4EE1910 
A4EE1920 
A4EE1930 
A4EF 1940 
A4EE1950 
A4EE1960 
A4FE1970 
A4EE1980 
A4EE1990 
A4 EE 2000 
A4EE2010 
A4FE2020 
A4EE2030 
A4EE2040 
A4FE2050 
A4EF2060 
A4EE2070 
A4EF2Q80 
A4EE2090 
A4EF2100 
A4EE2110 
TRUE A4EE 2 120 


3 ADHESIVES. REFINF ANSWER BY PRECISE 
COMPUTE JOINT STRENGTH FOR ELASTIC-PLASTIC 
DO 360 M = It NMAX 
AM = M 

AOVERL = AREF - (AM - l.)*ADEL 
ARMOR = 1. - AOVERL 

COMPUTE ASSOCIATED AVERAGE BOND STRESS 

TAVOTP(M) * 1. - ( VLREF*GAMMAP/0LAP2 ♦ 
1 * AOVERL) / ALOG(ARMDR) 


SOLUTION 

ADHESIVE 


IN POWER SERIES 
BEHAVIOUR 


(VLREF*THERM/OLAP - VUREF) 


( l.-TAVOTP(M) )/ ARMOR ) 
AREF 
AREE 
AREF 


START COMPUTING PLASTIC STRESS SERIES 

ESTABLISH~A( 2) AT START OF ELASTIC ZONE FROM CONTINUITY OF SHEAR 

1 STRAINS IN ADHESIVE AT TRANSITION. THIS ENSURES ADHEREND 

2 CONTINUITY 

A ( 2 ) = THE RM^OL A° - 0LAP2*(VUREF - 

C A ( 2 ) SHOULD BE .LT. 0. FOR AOVERL .LT. 

C A ( 2 ) SHOULD BE .EO. 0. F OR AOVERL .EO. 

C A ( 2 ) SHOULD BE .GT. 0. FOR AOVERL .GT. _ 

A ( 3 ) = ( A ( 2 ) - THERM*OLAP ♦ 0LAP2*VUR£F/VLREF ) / ( 2 • *ARMDR ) 

C CONVERT STRESS TERMS INTO AVERAGE STRESS TERMS BY DIVIDING BY N 
A ( 2 ) = A ( 2 ) / 2. 

A ( 3 ) * A(3) / 3. 

C COMPUTE SUBSEQUENT TERMS FROM RECURRENCE FORMULA 
DO 240 N = 4, NMAX 
NSAVE = N 
AN = N 

A ( N ) - ( ( 2 .*AOVERL - l. )*( AN-2. )*< AN-1. ) *A( N-l ) ♦ 

1 ( AN-3. )*( AN-2. )*A(N-2) + ( OLA P2/VL REF ) * 

2 ( ( AOVERL ♦VUREF * VRREF ) ♦A ( N-2 > ♦ VUREF*A ( N-31) ) / 

3 ( AOVERL * ARMOR* (AN- l. )«AN) 

IF ( ABS ( A < N ) ) .LT. 1.E50) GO TO 240 
C IF NOT, OVERFLOW IS IMMINENT t SO CUT DOWN ON NMAX 
GO TO 250 
240 CONTINUE 
GO TO 270 

250 DO 260 N = NSAVE « NMAX 
260 A ( N) * 0. 

C ESTIMATE ELASTIC ADHESIVE STRESS AT OTHER END OF 
C 1 EXISTENCE OF SECOND PLASTIC ADHESIVE ZONE , 

C START BY ASSUMING NO SECOND PLASTIC ADHESIVE ZONE 
270 COVERL = 0. 

C TAUEND( l) = 1. 

TAUEND(NMAX) = I. 

DO 280 N * 2t NMAX 
AN * N 

280 TAUEND(NMAX) = TAUEND(NMAX) ♦ A ( N ) *( ARMDR**( N-l )) *AN 

IF (TAUEND(NMAX) .LF. 1.) GO TO 310 _ „ ^ ^ ^ 

SOf ONLY THE ONE PLASTIC ZONE, AT THE NCRTND REFERENCE END 


/ VLREF 


JOINT, OR IDENTIFY 
AS APPROPRIATE 


IF >Uf U1XL T inc U*NC IU «1 me n cr t. tnu 

IF NOT, HAVE IDENTIFIED EXISTENCE OF SECOND PLASTIC ZONE, AT OTHER 


A4EE2130 
A4EE2I40 
A4EE2I50 
A4EE2160 
A4EE2170 
A4EE2180 
A4EE2190 
A4 EE 22 00 
A4EE2210 
A4EE2220 
A4EE2230 
A4EE2240 
A4EE2250 
A4EE2260 
A4EE2270 
STRESS A4EE2280 
A4EE2290 
A4EE2300 
A4EE2310 
A4EE2320 
A4EE2330 
A4EE2340 
A4EE2350 
A4EE2360 
A4FE2370 
A4EE2380 
A4EE2390 
A4EE2400 
A4EE2410 
A4EE2420 
A4EE2430 
A4EE2440 
A4EE2450 
A4EE2460 
A4EE2470 
A4EE2480 
A4EE2490 
A4EE2500 
A4EE2510 
A4EE2520 
A4EE2530 
A4EE2540 
A4EE2550 
A4FE2560 
A4EE2570 
A4EE2580 
A4EE2590 
A4EE2600 
A4EE2610 
A4EE2620 
A4EE2630 
ENDA4EE 2640 
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A4EE2650 

PROCEDURE FOR SECOND PLASTIC ZONE A4EE2660 

JSE LINEAR INTERPOLATION TO ESTIMATE COVERL (EXTFNT OF SECOND PLASTIC A4EE2670 
l ZONE I A4E62680 

DEL 80L = (1. - AOVERL) / (ANMAX - I.) A4EE2690 

ROVERL(l) = 1 . “ AOVERL A4EE2700 

DO 300 N 1 = 2 T NM A X A4EE2 7 10 

BOVERL(Nl) = BOVERL(Nl-l) + OELROL A4EE2720 

TAUEND(Nl) = l. A4EE2730 

DO 290 N = 2» NM A X A4EE2740 

AN = N A4EE2750 

V = 80VERL(N1 ) ** ( N- l I A4EE2760 

290 TA'JENDfNl) = TAlJPNn(Nl) + A(N)*V*AN A4EE2770 

CHECK FOR CONVERGENCE OF COVERL A4EE2780 

I F C ( l.OOOi.GT.TAIJEND(Nl) I • AND . (0.9°99.LT . T AUE N0( N1 ) ) ) GO TO 310A4EE2790 
IF NOT, ITERATE ON COVERL A4EE2800 

COMPUTE VALUE OF COV c RL NEFOED TO RESTRICT STRESSES TO ELASTIC LEVEL A4EE2810 
I c CTAUEND(Nl) . LT • l.) GO TO 300 A4FE2820 

IF SO, ESTIMATF OF BOVfRL IS INSUFFICIENT AND THAT OF COVERL EXCESSIVE A4EE2830 
IF NOT, CORRECT TRANSITION LIES BETWEEN N1 AND Nl-l LOCATIONS A4EE2840 

COVERL = 1. - AOVFRL - 80VERL(NL-1) - A4EF2850 

L ( ( 1 • - TAUFND(Nl-l) ) / (TAUEND(Nl) - T AiJENDt Nl- 1) ) ) A4EE2860 

GO TO 310 A4EE2870 

300 CONTINUF A4EE2890 

OFFER CHECK ON WHETHER COVERL IS SO LARGE THAT CRITICAL END OF JOINT A4EE28^0 
1 IS AT HTHFR END UNTIL AFTER CONVERGENCE OF AOVERL IS E ST ABL I SH EDA4EE2900 

A4EF29I0 

310 SAVOTP(M) = 1* 

BOVL = 1. - AOVFRL - COVERL 

EVALUATE AVERAGE STRESS IN TERMS OF SERIES COEFFICIENTS 
DO 320 N = 2, NM A X 
AN = N 

320 SAVOTP(M) = SAVOTP(M) + A(N)*(80VL**(N) ) 


0.1 ) GO TO 340 
.GT. -0.00001) ) 

.GT. -0.00001) ) 

TO CHECK FOR 


) GO TO 350 


330 
340 
3 50 


TO 360 
ESTABLISHED 

BETWEEN M AND M-t LOCATIONS 
(TAVOTP(M) - T AVOTP { M- 1 ) ) ♦ 


C CHECK ON CONVERGENCE OF AOVERL 

IF (SAVOTP(M) .GT. 1.) GO TO 360 
C IF SO, CANNOT HAVE CONVERGED YET 

IF ( (SAVOTP(M) .LT. TAVOTP(M)) .AND. ( M . EQ. 1) ) GO TO 330 

C IF SO, SOLUTION IS NUMERICALLY I ND I ST I NGUI SHI BLE FROM THE LOWER BOUND 
C NEED BOTH M .EO. 1 VALU C S AND M .FQ. 2 VALUES FOR FIRST CHECK 
IF (M .EQ. 1) GO TO 360 
C PROTECT AGAINST DIVISION BY ZERO 

I p ( ( T AVOTP ( M ) .FQ. 0.) .AND. (SAVOTP(M) .EQ 

C IF SO, CONVERGENCE ESTABLISHED 

IF ( (SAVOTP(M) .LT. 0.00001) .AND. (SAVOTP(M) 
l RATIO a i. ♦ TAVOTP(M) 

IF ( (TAVOTP(M) .LT. 0.00001) .AND. (TAVDTP(M) 

I RATIO = I. + SAVOTP(M) 

C IF NONE OF THE ABOVE, NO FURTHER FAILURE CASES LEFT 
RATIO * SAVOTPIM) / TAVOTP(M) 

C CHECK ON CONVERGENCE OF JOINT STRENGTH PREDICTIONS 

IF ( (1.0001 .GT. RATIO) .AND. (0.9999 .LT. RATIO) 

C IF SO, CONVERGENCE IS ESTABLISHED 
C IF NOT, NEED TO R F-EST IM ATE AOVERL 

C JSE LINEAR INTERPOLATION TO ESTIMATE AOVERL (EXTENT OF FIRST PLASTIC 
C l ZONE) 

IF (SAVOTP(M) .GT. TAVOTp(M)) GO 
C IF SO, CONVERGENCE DP AOVERL NOT YFT 
C IF NOT. CORRECT VALU C OF AOVERL LIES 
TRAT10(J*NCRTND) = TAVOTP(M-l) + 

1 Hi. - TAVOTP(M-l) / SAVOTP ( M— I ) ) / 

2 (i. - (SAVOTP(M) - TAVOTP(M) ♦ TAVOTP(M-I)) / SAVOTP(M-l)) 

GO TO 370 
TRATIOi J.NCRTND) 

GO TO 370 
TRATIO( J,NCRTND) 

GO TO 370 
TRATIOU, NCRTND) 

GO TO 3 7 0 

360 CONTINUE 

C IF REFINEMENT HAS NOT CONVERGED, USE LOWER BOUND ESTIMATE 
C TRATIO( J, NCRTND) = TAVOTP(l), AS SET EARLIER 
C PROTECT AGAINST ACCUMULATED NUMERICAL ERRORS 

C JSE LOWER BOUND SOLUTION IF REFINEMENT RESULTS IN STILL LOWER VALUES 
370 IF (TRATIOU, NCRTND) .LT. TAVOTP(l) ) TR AT I 0 ( J , NCRTND > = TAVOTP (1) 
380 CONTINUE 
C 

C CONVERGENCE OF AOVFRL ESTABLISHED. RECORD AVERAGE SHEAR STRESS 
C VALUES COMPUTED ARE NOW STORED IN TR AT 10 ( J , NCRTND ) 

C NEED TO SELFCT LOWFR VALUE TO IDENTIFY CRITICAL END OF JOINT 
DO 450 J = 2, JMAX 
OLAP = OL ( J ) 

TAU1 * TRATIOU, 1) 

TAU2 = TR AT I 0 ( J , 2 ) 

IF ( (TAUL .LT. 1.) .OR. ( TAU2 .LT. 1.) ) GO TO 390 
C IF SO, JD I NT IS NOT FULLY PLASTIC 

C IF NOT, IDENTIFY CRITICAL END OF JOINT FROM SHEAR STRAIN GRAOIENT 
GRADNT = THERMC(l) - OL A P* VU ( L ) / VL ( 1) 


= TAURFF 
= 0 . 

= TAVOTP(M) 


A4EE2920 
A4 EE 2930 
A4 EE 2940 
A4EE2950 
A4FE2960 
A4EE2970 
A4EE2980 
A4 EE 2990 
A4EE3000 
A4EE30I0 
A4FE3020 
A4EE3030 
A4EE3040 
A4 EE 3050 
A4EE3060 
A4EE3070 
A4EE3080 
A4EE3090 
A4EE3L00 
A4EE3I10 
A4EE3120 
A4EE3130 
A4EF3140 
A4EE3150 
A4EE3L60 
A4EE3170 
A4EE3180 
A4EE3190 
A4EE3200 
A4EE32I0 
A4EE3220 
A4EE3230 
A4 EE 3240 
A4EE3250 
A4EE3260 
A4EE3270 
A4EE3280 
A4 EE 3290 
A4EE3300 
A4FE3310 
A4EE3320 
A4EE3330 
A4EE3340 
A4EE3350 
A4EE3360 
A4EE3370 
A4EE3380 
A4EE3390 
A4EE3400 
A4EE3410 
A4EE3420 
A4EE3430 
A4EE3440 
A4EE 3450 
A4EE3460 
A4EE3470 
A4EE3480 
A4EE3490 
A4EE3500 
A4EE3510 
A4EE3520 
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ICRTNO<J,K) * 
T CRTND ( J * K ) * 
ICRTND(J*K) = 


* TAU1 

- TAU2 


LT. 

0 . * 

NCRTND .EQ. 

1 

FQ. 

0 ., 

NCRTNO .EQ. 

0 

GT. 

O.f 

NCRTND .EQ. 

2 


IF (GRADNT .LT. 0,) 

IF (GRADNT .EQ. 0.) 

IF (GRADNT * GT * 0*1 
T AUAVG ( J » K | = l. 

STRGTH ( J » K ) * OLAP 
MCRTND = ICRTND(J,K) 

IF ( MCRTND *EQ. 0) MCRTND ’ 

TRANSLCK) = OLTRNT ( MCRTND ) 

GO TO 450 
390 DIFFNC 
C IF DIFFNC . 

C IF DIFFNC . 

C IF DIFFNC « 

IF (DIFFNC) 40 0*41 0*420 
C ADHEREND (1) END OF JOINT CRITICAL 
400 T AUAVG ( J * K ) * TAU1 

STRGTH ( J * K ) » TAII1 * PLAP 
ICRTNDUtK) = 1 

C COVER SITUATION WHERE TRANSITIONAL LENGTH 
IF (J .EO. 2) TRANSLCK) = OLTRNT ( 1 ) 

GO TO 430 

BOTH ENDS OF JOINT EQUALLY CRITICAL FROM NULLIFYING 
1 ADHEREND IMBALANCES 
410 T AU AVG ( J * K ) = TAU1 

STRGTH! J * K ) * TAU1 * OLAP 
I CRTND ( J • K ) =0 

COVER SITUATION WHERE TRANSITIONAL LENGTH IS LESS THAN 0L(2) 
IF (J «EQ« 2) TRANSL(K) = OLTRNT(l) 

GO TO 430 

ADHEREND (2) END OF JOINT CRITICAL 
420 TAUAVG(JtK) * TAU2 

STRGTH ( J * K ) = TAU2 ♦ OLAP 
ICRTNDC J *K ) =2 

COVER SITUATION WHERE TRANSITIONAL LENGTH IS LESS THAN 0LC2) 
IF (J .EQ. 2) TRANSLCK) = OLTRNT C 2) 

COVER CASES OF ZERO OR NEGATIVE ESTIMATED STRENGTHS 
430 IF (TAUAVG(JtK) .GT. 0.) GO TO 440 
IF NOT* JOINT HAS BROKEN DUE TO THERMAL 


IS LESS THAN 0LC2) 


(OR ZERO) 


STRESSES WITHOUT EXTERNAL 


1.) GO TO 450 
COMPUTATIONAL 
ERROR 
NM AX 


TAUAVG(JtK) = 0. 

STRGTHC J * K ) * 0. 

GO TO 450 

440 IF (TAUAVG(JtK) .LE. ... 

IF NOT* THERE HAS BEEN A COMPUTATIONAL MISTAKE 
PRINT ASTERISKS TO IDENTIFY 
RERUN WITH GREATER VALUE OF 
TAUAVG(JfK) = 100. 

STRGTH ( J * K ) = 1000. 

450 CONTINUE 
460 CONTINUE 

SET UNIFORM STRESS FQR ZERO OVERLAP 
DO 470 K » 1, KM AX 
TAUAVGC 1* K) = 1. 

STRGTH ( 1 * K ) = 0. 

470 I CR TNDC 1 * K ) = ICRTND(2*K) 

HENCE NEED for 0LC2) TO BE SMALL ENOUGH TO BE LESS THAN THAT AT WH 
1 NCRTND CHANGES 

END OF COMPUTATIONS. START PRINTING OUT OF TABULATED RESULTS 


5 6H ADHESIVE-BOND ED SCARF JOINTS ( 


ELASTIC ADHESIVE SHEAR STRAIN R 


MISMATCH COEFFICIENT) 


PRINT OUT AVERAGE STRFSS HEADING 
WRITE (6,480) 

430 FORMAT (IH1/* 5(1H0/)* 27X , 

1 T I C-PL AST I C ANALYSIS)/* 

2 3 9X * 31 HNON-D I ME NS I ON AL I ZED FORMULATION/) 

WRITE (6*4^0) GAMMAR 

490 FORMAT ( IHO * 27X* 43HPLASTIC TO 
l = , F5.2) 

IF (CTHERM(I) .NE. 0.) GO TO 510 
WRITE (6,500) 

530 FORMAT ( 1H * 37X* 33HZER0 THERMAL 
GO TO 530 

510 WRITE (6*520) THERMC(l)* THE RMC ( 2 ) 

520 FORMAT ( IH * 16X* 3 L HTHERM AL MISMATCH 
1 l th for TFNSION* = * F 6 * 3 * 16H for 
530 WRITE (6,540) ( ETR ( K ) * K = 1* KMAX) 

540 FORMAT ( IHO* b^X, 30H0 = ROTH ENDS FQUALLY CRITICAL/* 20X* 

1 72HAVERAGE SHEAR STRESS / MAXIMUM SHEAR STRESS * 1 = SOFT 

2ND CRITICAL/* 68X, 25H2 = STIFF FT END CRITICAL/* 

3 RHO SCALED* 3 1 X * 39HEXTENSI ONAL STIFFNESS (THICKNESS) PATIO/ 

4 7H l/T/r 7 H RATIO, F7*l. 9F10.L/* IH ) 

C WRITE OUT TABULATIONS OF AVERAGE BONO STRESSES 

DO 560 J « It J M AX 

W»ITE ( 6,550) OL ( J ) * ( < TAU AVG ( J * K) * l C RTN0( J *K ) ) , K= l* KMAX) 
550 FORMAT ( IH * F6.2* 2X* L0(F7.5* IX* II* IX)) 

560 CONTINUE 


COEFFICIENT = 
COMPRESSION) 


F6.3* 


PRINT OUT JOINT STRFNGTH HEADING 


A4EE3530 
A4EE3540 
A4EE3550 
A4EE3560 
A4EE3570 
A4EE3580 
A4EE3590 
A4EE3600 
A4EE3610 
A4EE3620 
A4EE3630 
A4EE3640 
A4EE3650 
A4EE3660 
A4EE3670 
A4EE3680 
A4EE3690 
A4EE3700 
A4EE3710 
A4EE3720 
A4EE3730 
A4EE3740 
A4EE3750 
A4EE3760 
A4EE3770 
A4EE3780 
A4EE3790 
A4EE3900 
A4EE3910 
A4EE3820 
A4EE3830 
A4EE3840 
A4EE38 50 
A4EE3860 
A4EE3870 
A4EE3880 
A4EE3890 
L0ADA4EE3900 
A4EE39I0 
A4EE3920 
A4EE3930 
A4E63940 
A4EE3950 
A4EE3960 
A4EE3970 
A4EE3980 
A4EE3990 
A4EE4000 
A4EE4010 
A4EE4020 
A4EE4030 
A4EE4040 
A4EE4050 
A4EE4060 
A4EE4070 
ICH A4EE4Q80 
A4EE4090 
A4EE4100 
A4EE41 10 
A4EE4120 
A4EE41 30 
A4EE4140 
ELAS A4EE 41 50 
A4EE4160 
A4EE41 70 
A4EE4180 
AT l 0 A4EE4 190 
A4EE4200 
A4EE4210 
A4EE4220 
A4EE4230 
A4EE4240 
A4EE4250 
A4EE4260 
A4EE4270 
A4EE4280 
A4EE4290 
ET EA4EF4300 
A4EE4310 
* A4FE43 20 

A4EE4330 
A4EE4340 
A4EE4350 
A4EE4360 
A4EE4370 
A4EE4380 
A4EE4390 
A4EE4400 
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56HA0HFS IVF-BONDED SCARF JOINTS ( 


WRIT? 16,570) 

570 FORMAT (IH1/, 5HH0/1, 27X, 

1TIC-PLASTIC ANALYSIS)/* 

2 3*X, 31HN0N-DI MENSIONALIZED FORMULATION/) 

WRITE C 6* 5 90 ) GAMMAR 

590 FORMAT! 1H0* 27X, 49HPL ASTI C TO ELASTIC ADHESIVE SHEAR STRAIN R 
l = , F5.2) 

I<= CCTHERM(l) .NE. 0.) GO TO 600 
WRITE (6,590) 

590 FORMAT f LH * 37X, 33HZER0 THERMAL MISMATCH COEFFICIENT) 

GO TO 620 

600 WRITE (6*610) THFRMC(l), THERMO ( 2) 

610 FORMAT (1H , 16X, 31HTHERMAL MISMATCH COEFFICIENT - , F6.3* 

1 !7H FOR TENSION, = * F6.3, 16H C 0R COMPRESSION) 

620 WRITF (6,630) ( ETR ( K ) * K = 1* KM AX ) 

630 FORMAT ( IHO, 67X , 30H0 = ROTH ENOS EQUALLY CRITICAL/, 20X, 
l 72HN3N-DIMENSI0NALIZF0 JOINT STRENGTH , 1 * SOFT 

2ND CRITICAL/, 63X, 25H2 * STIFF FT END CRITICAL/, 

3 9H0 SCALED, 3IX, 3°HEXTENSI ONAL STIFFNESS (THICKNESS) RATIO/ 
6 7H L/T/ f 7H RATIO, F7*l, 9F10.1/, LH ) 

C WRITE OUT TABULATIONS OF JOINT STRENGTHS 

00 650 J = i, J M AX 4 t 

WRITE (6,640) 01 ( J ) , ( ( STP GTH ( J * K ) , ICRTND ( J , K ) ) , K * 1, KM A X ) 
640 FORMAT ( 1H , F6*2, 2X, 10<F7.4, IX, II, IX)) 

650 CONTINUE 

C WRITE OUT TRANSITIONAL JOINT STRENGTHS 

WRITE (6,660) (TRANSL(K), K = 1, KMAX) 

660 FORMAT (8H0 TRANSL, IX, 10(F7.4, 3X1 ) 

670 CONTINUE 
C 

WRITE (6,690) 

690 FORMAT (1H1, 19H PROGRAM COMPLETED) 

STOP 

END 


A 4 E E 44 1 0 
ELASA4EF4420 
A4EF4430 
A4EE4440 
A4EE4450 
AT I0A4EE4460 
A4EE4470 
A4EE44 80 
A4EE4490 
A4EE4500 
A4EE45L0 
A4EE4520 
A4EE4530 
A4EE4540 
A4EE4550 
A4EE4560 
ET EA4EE4570 
A4EE45 80 
, A4EE4590 

A4FF4600 
A4EF46L0 
A4EE4620 
A4EF4630 
A4EE4640 
A4FE465 0 
A4FE4660 
A4 EE 4670 
A4EE4680 
A4EF4690 
A4EE4700 
A4EE4710 
A4EE4720 
A4EE4730 
A4EE4740 
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ADHESIVE- BONDED SCARF JOINTS (ELASTIC-PLASTIC ANALYSIS) 
NON-OIMENSIONALIZED FORMULATION 


PLASTIC TO ELASTIC ADHESIVE SHEAR STRAIN RATIO 


VI 1 


RATIO 

0.0 
0.20 
0.50 
l .00 
1.20 

1.50 
1.70 
2.00 

2.50 

3.00 
A. 00 

5.00 

6.00 
8.00 

10.00 

12.00 

15.00 

17.00 

20.00 

25.00 

30.00 

35.00 

40.00 

45.00 

50.00 


THERMAL MISMATCH COEFFICIENT * 1.000 FOR TENS 1 ON* 

NON-DI MENSIUNAL I ZED JOINT STRENGTH , 


5.0 


SCALEO 


0*1 

0.0 

0.2000 

0.5000 

1.0000 

1.2000 

1.5000 

1.7000 

2.0000 1 

2.5000 1 

3.0000 l 
3. 6484 1 
4.0026 1 
4.259ft l 
4*5576 1 
4.8582 l 
5.1248 1 
5.4906 1 
5.7213 1 
6.0557 l 
6.5943 1 
7.1200 1 
7.6382 1 
8.1518 1 
8.6624 l 
9.1709 l 


-1.000 FOR COMPRESSION 

0 * BOTH ENOS EQUALLY CRITICAL 

1 * SOFT ET END CRITICAL 

2 * STIFF ET ENO CRITICAL 


0.2 


TRANSL 3.1576 


0.0 2 
0.2000 2 
C • 5039 2 

1.0000 2 

1.2000 2 

1.5000 0 
1.7000 1 
2.000C 1 

2. 5000 l 

3.0000 L 
3.0998 1 
4.3962 l 
4.7826 1 
5.3763 1 
5.8512 1 
6.3263 l 
7.0028 1 
7.4384 1 
8.0782 1 
9.1229 1 

10.1525 1 
11.1736 1 
1 2 • 1 ft9 3 1 
1 3. 2016 1 
14.2113 l 

3.5895 


EXTENS 1 ON AL STIFFNESS (THICKNESS) RATIO 


0. 3 


0.4 


0.5 


0.6 


0.0 

2 

0.0 

2 

0.0 

2 

0.0 

2 

0. 2O0C 

2 

0.2030 

? 

0.2000 

2 

0. 2000 

2 

0.5300 

2 

0.5000 

? 

0.5000 

2 

0.5C00 

2 

l .0000 

2 

l .0030 

? 

1 .0000 

2 

1.0000 

2 

[ .2C0C 

2 

1.2000 

2 

1.2000 

2 

1.2000 

2 

l . 5000 

2 

1 .5000 

? 

1.5000 

2 

1 .5000 

2 

1.7000 

l 

1 . 7000 

2 

1.7000 

2 

1.7000 

2 

2.0000 

l 

2.0000 

2 

2.0000 

2 

2.0000 

2 

2. 5000 

1 

2. 5000 

1 

2.5000 

2 

2.5C00 

2 

3 .0000 

l 

3.0000 

1 

3.0000 

0 

3.0000 

2 

4.0000 

1 

4 . OOC 0 

1 

4.0000 

1 

4 .0000 

0 

4.7267 

! 

5.C000 

l 

5.0000 

l 

5.0000 

1 

5.2518 

1 

5.6524 

1 

5.9999 

1 

6.0000 

1 

6.1 055 

1 

6.7624 

1 

7.3451 

1 

7.9402 

1 

6. 8381 

1 

7.7193 

l 

3. 5517 

l 

9.2849 

1 

7.4362 

1 

9.6009 

1 

9.6666 

1 

10.6464 

1 

3.4752 

1 

9.9027 

1 

11.2764 

1 

12.5839 

1 

9. 1 166 

1 

10.7513 

l 

12.3334 

1 

13,8491 

L 

.0.0626 

1 

12.0046 

1 

13.8965 

1 

15.7251 

l 


11.6144 1 
13.14R6 1 
14.6729 1 
16.1911 1 
17.7C52 1 
19.2164 1 

4.1142 


L 4 . 0 64 7 1 
16.1044 1 
13.1325 l 
20.1535 l 
22.1698 l 
2 4.1828 1 

4. 7761 


16.4670 
19.C134 
21.5462 l 
24.0706 l 
26.5396 L 
29.1047 l 


18.8093 l 
21.B645 l 
24 • 9C3 4 • l 
27.9324 1 

30.9547 l - 

33.9726 1 38.7690 l 


0.7 

0.0 

0.2000 

0.5000 

1.0000 

1.2000 

1.5000 

1.7000 
2.C000 

2.5000 

3.0000 

4.0000 

5.0000 - 

6.0000 1 

8.0000 l 

9.9997 ‘ 

1 1 » 4904 
13.7902 
15.2743 
17.4641 
21.0690 
24.6371 
28.1348 
31.7201 
35.2474 


0.8 


5.6533 


6.8990 


8.6633 


0.0 

0.2000 

0.5000 

1.0000 
l . 20 30 

1.5000 

1.7000 

2.0000 

2.5000 

3.0000 

4.0000 

5.0000 

6.0000 

8.0000 

10.0000 

12.0000 l 
14.7790 l 
16.5133 l 
19 .05 1 7 1 
23.1927 1 
27.2339 1 
31.3471 l 
35.3935 l 
39.4290 1 
43.4570 l 

12.5777 


0.9 

0.0 

0.2000 

0.5000 

1.0000 

1.2000 

1.5000 

1.7000 

2 .0000 

2.5000 

3.0000 

4.0000 

5.0000 

6.0000 

3.0000 

10.0000 

12.0000 

15.0000 

17.0000 

20.0000 
24.9678 
29.6214 
34.2370 
38.8160 1 
43.3747 1 
47.9200 1 

23.1106 


1.0 

0.0 

0.2000 

0.5000 

1 .0000 
1.2000 
L.5C00 
1.7000 

2.0000 
2.5000 

3.0000 

4.0000 

5.0000 
5.9999 
7.9253 
9.6345 

1 1.5248 
14.3952 
16.3252 
19.2379 
24.1246 
29.0380 
33.9691 
38.9126 
43.8654 
48.0249 

5.0000 


ADHES I VE-BONDEO SCARF JOINTS (ELASTIC-PLASTIC ANALYSIS) 
NON-DI MENSIONAL I Z60 FORMULATION 


PLASTIC TO ELASTIC ADHESIVE SHEAR STRAIN RATIO * 5.0 _ .... 

THERMAL MISMATCH COEFFICIENT » I. 000 FOR TENSION* * -l.OCO FOR COMPRESSION 


SCALEO 

L/T 

RATIO 

0.0 
0.20 
0.50 - 
1.00 
1.20 

1.50 
1.70 
2.00 

2.50 

3.00 

4.00 

5.00 
6.00 
8.00 

10.00 

12.00 

15.00 

17.00 

20.00 

25.00 

30.00 

35.00 

40.00 

45.00 

50.00 


AVERAGE SHEAR STRESS / MAXIMUM SHEAR STRESS * 


0 » BOTH ENOS EQUALLY CRITICAL 

1 * SOFT ET ENO CRITICAL 

2 * STIFF ET ENO CRITICAL 


EXTENSIONS STIFFNESS (THICKNESS) RATIO 


0.1 


0.2 


0.3 


0.4 

1.00000 

2 

1.00000 

2 

1.00000 

2 

1.00000 

1.00000 

2 

1.00000 

2 

1.00000 

2 

l .OGOCO 

1.00000 

2 

l.OOOOC 

2 

l.OCOOO 

2 

l.OOOOC 

t.oooco 

2 

I .ooooc 

? 

l. coooo 

2 

1.00000 

1.00000 

2 

1.00000 

2 

l .oococ 

2 

l .OOOOC 

1.00000 

1 

1.00000 

0 

l.CCOOC 

2 

1.00000 

l .00000 

1 

1.00000 

1 

1 .coooo 

2 

l.OOCOO 

1.00000 

l 

1.00000 

l 

1.00000 

1 

1.00000 

1.00000 

l 

1.00300 

l 

l.OCOOO 

1 

l.OOOCO 

1.00000 

1 

1.00000 

l 

1 .00000 

1 

1.00000 

0.91211 

l 

0.99994 

1 

l.OCOOO 

i 

i.ooooo 

0.80052 

0.70996 

1 

0.87925 

L 

0.94534 

1 

0.99999 

1 

0.79709 

l 

0.87531 

1 

0.94206 

0.57345 

1 

0.67203 

1 

0.76319 

1 

0.84530 

0 .485 82 

1 

0.58512 

l 

O.60C81 

1 

C. 77193 

0.42707 

1 

0.52719 

l 

C. 62385 

l 

C. 71675 

0.36604 

1 

0.46685 

1 

0.56502 

l 

0.66018 

0.33655 

1 

0.43755 

1 

0.53627 

1 

0.63241 

0.30278 

1 

0.40391 

1 

0.50313 

l 

0.60023 

0.26377 

l 

0. 36492 

l 

0.46458 

1 

0.56259 

0.23733 

l 

0.33842 

l 

0.43829 

1 

0.53681 

0.21923 

1 

0.31925 

1 

0.41923 

1 

0.51807 

0.20380 

1 

0.30473 

1 

0.40478 

1 

0.50384 

0.19250 

1 

0.29337 

l 

0. 39345 

1 

0.49266 

0. 18342 

1 

0.28423 

1 

0. 38433 

1 

0.48366 


0.5 

1.00000 

1. 00000 

x.ocooc 

1.00000 
1.00000 
1.00000 
1.00000 
1.00000 
1.00000 
1.00000 
1.00000 
1.00000 
0.99999 1 
0.91814 l 
0.85517 L 
0.80555 l 
0.75176 1 
0. 72549 1 
0.69483 t 
0.65868 1 
0.63378* l 
0.61561 1 
0.60177 1 
0.59088 1 
0.58209 l 


0.6 

1.00000 

1.00000 

l.OCOOO 

1.00000 

t.coooo 

l.CCCOO 
1 .00000 
1.00000 
l.OCOOO 
1 .coooo 
1.00000 
l.OOCOO 
1.00000 1 
0.99253 1 
0.92849 1 
0.88720 1 
0.33893 1 
0.81465 1 
0.78625 1 
0.75237 1 
0.72882 l 
0.71153 l 
0.69831 1 
0.68789 1 
0.67945 l 


0.7 


0.8 


1.00000 
1.00000 
1 . coooo 
1.00000 
1.00000 
1.00000 
1.00000 
1.00000 
1 . coooo 
1 . coooo 

l.OCOOO 
1.00000 
1.00000 1 
1.00000 t 
0.99997 1 
0.95753 t 
0.91935 1 
0.89949 1 
0.87321 l 
0.84276 1 
0.82124 l 
0.80528 I 
0.79300 l 
0.78328 1 
0.77530 1 


1.00000 
1.00000 
1.00000 
1.00000 
1.00000 
1.00000 
1.00000 
1.00000 
1.00030 
1.00000 
1.00000 
l.OOCOO 
1.00000 
l.OCOOO 
1.00000 
1.00000 l 
0.98527 l 
0.97137 l 
0.95259 1 
0.92771 1 
0.90946 1 
0.89563 1 
0.88484 l 
0.87620 l 
0.86914 l 


0.9 

1.00000 
l. COOOO 
1.00000 
1 .COOOO 
1.00000 
1.00000 
l .00000 
l.OCOOO 
1.00000 
1 .00000 
1.03000 
1.00000 
1 .00000 
1.00000 
1.00000 
1.00000 
1 . coooo 
1.00000 
l.OOCOO 
0.9987 l 
0.99738 
0.97820 1 
0.97040 l 
0.96388 l 
0.95840 l 


1.0 

1.00000 
1.00000 
1.00000 
1.00000 
1.00000 
1,00000 
1.00000 
1.00000 
1.00000 
1.00000 
1.00000 
1.00000 
0.99999 
0.99066 
0.96345 
0.96040 
0.95968 
C. 96031 
0.96189 
C. 96498 
C. 96793 
0.97055 
0.97282 
0.97479 
0.97650 
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ADHESIVE-BONDED SCARF JOINTS I EL AST I C-PLAST I C ANALYSIS) 

non-oimensionalized formulation 


„ s l!k«J , SogFfWiS} c -*2¥!aSX E F §!l 6 ?2NlI5a! N S 4 ToSo f%° compression 


SCALED 

L/T 

RATIO 

0.0 

0.20 

0.50 

1.00 
1.20 

1.50 
1.70 

2.00 

2.50 

3.00 
A. 00 

5.00 

6.00 
8.00 

10.00 

12.00 

15.00 

17.00 
20 .00 

25.00 

30.00 

35.00 
AO. 00 
*5.00 

50.00 


THERMAL M 


N0N-D1 MENSIONAL I ZED JOINT STRENGTH t 


0. I 

0.0 1 
0.2000 1 
0.5000 1 

1.0000 l 

1.2000 l 

1.5000 1 

1.7000 1 

2.0000 l 
2. *992 ' 
2.3553 
2.5137 
2.6328 
2.6965 
2 . 8*21 
3. 0**3 
3.2*62 
3.5*75 
3.7*78 
*,0*81 
*.5*82 
5.0*82 
5.5*82 
6.0*3* 
6.5*37 


0 * BOTH ENOS EQUALLY CRITICAL 

1 * SOFT ET END CRITICAL 

2 * STIFF ET ENO CRITICAL 


0.2 


7.0*9* l 


TRANSL 1.935* 


0.0 1 
0.2000 l 
0.500C l 
l.OOGP 1 
1.2000 1 

1.5000 1 

1.7000 l 

2.0000 L 
2. *996 l 
2.5329 l 
2.7894 1 

3.0062 1 
3.1912 1 
3.52L6 1 
3.9160 1 
*.3151 1 
*.913* 1 
5.3123 1 
5.9103 1 
6.9090 1 
7.9076 i 
8.9065 1 
9.9053 1 
10.9053 l 
11.9051 1 

2.0895 


EX TE NS I ONAL STIFFNESS (THICKNESS) RATIO 


0.3 

0.0 1 

0.2000 1 
0.5000 l 
l.OOOC L 
1.2C0G l 

1.5000 1 

1.7000 1 

2.0000 L 
2. *999 1 
2.9991 l 
3.0*3* l 
3.35** 1 
3.6503 l 
*.130B l 
* . 760 L 1 
5.3556 1 
6 . ? 50C 1 
6.8*69 1 
7.7*33 1 
9. 2387 1 
10.7355 l 
12.2331 1 
13.7313 1 
15.2299 1 

L6.7239 1 

2.2570 


0 .* 

0.0 1 

0.2000 l 
0.5000 l 
L .0000 l 
1.2000 l 

1.5000 1 

1.7000 1 

2.0000 1 

2.5000 1 
2.9995 1 
3.275* l 
3.679* l 
*.0727 i 
*.3180 1 
5.5762 1 
6.3665 l 
7.5559 l 
3.3502 1 
9.5*37 l 

11.5357 1 
13.5301 l 
15.5259 1 
17.5227 1 
L9.5203 1 
21.5183 1 

2. **27 


0.5 

0.0 l 

0. 2000 1 
0 .5000 L 

1.0000 1 
1.2000 l 

1.5000 1 

1.7000 1 

2.0000 l 

2.5000 i 

2.9999 1 
3. *8*5 1 
3.9806 1 
*•*663 1 
5. *2*1 1 
6.3663 l 
7.3*55 l 
8.8232 L 
9.819* l 

11.3090 l 
13.7965 l 
16.2377 1 
19.7812. 1 
21.2763 1 
23.7723 1 
26.2692 1 

2.6533 


0.6 


0.0 l 
0.2000 1 
0.5000 l 
1.0000 l 
1.2000 l 
1.5000 l 
1.7000 l 


2.0000 . 

2.5000 1 

3.0000 l 
3.0805 1 
*.2563 l 
*.8326 1 
5.9866 1 
7.1293 
8.2899 
10.0633 
11.2501 
13.03*5 
16.0158 
L9.0028 . 
21.9932 1 
2*. 9858 1 
27.9799 1 
30.9752 1 

2.8990 


0.7 

0.0 l 

C. 2000 l 
0.5000 1 

1.0000 1 

1.2000 l 

1.5000 l 

1.7000 l 

2. 0000 l 

2.5000 l 

3.0000 L 

3.9996 1 
* . 50*1 l 
5.1691 1 

6.505* 1 
7.8520 l 
9.1993 l 

11.25*3 l 
12.6351 l 
1* . 7 123 l 
18.1851 1 
21.6660 l 
25.1519 l 
28.6*11 1 
32.1325 1 
35.6255 1 

3. 1967 


0.8 

0.0 


0.9 


l 

0.2030 1 
0.5000 1 

1.0000 l 
1.200C l 

1.5000 l 

1.7000 l 
2 . CO 30 l 

2.5000 1 

3.0000 l 

3.9999 1 
*.9992 l 
5. *712 1 
6.9831 l 
8.515* l 

10.0606 1 
12.3923 l 
13.962* l 
16.3292 l 
20.2891 1 

2*. 2608 1 
28.2398 1 
32.2236 L 
36.2107 l 
*0.2001 t 

3.5777 


0.0 
0.2000 1 
0.5000 l 

1.0000 t 

1.2000 l 

1.5000 1 

1.7000 1 

2.0000 1 

2.5000 1 

3.0000 1 
*.OOCO 1 
*.9998 1 
5. Q993 l 
7. *109 l 
9.1169 l 

10.8*36 1 
13. *59* 1 
15.2136 l 
17. B 59* 1 
22.2970 1 
26.7525 l 
31.2190 L 
35.6929 L 
*0.1718 


1.0 


1 o.c 


0.2000 1 

0.5000 1 

1 . 0000 l 

1.2000 1 

1.5000 1 

1.7000 l 

2.0000 i 

2.5C00 i 

3.0000 l 

*.0000 1 

5.0000 1 

5.9999 1 
7.9253 i 
9.63*5 1 

11.52*8 1 
1 * . 3 952 1 
16.3252 1 
19.2379 1 
2 *. 12*6 1 
29-.0380 1 
33.9691 i 
38.9L26 1 
*3.865* ' 


**.65*6 l *8.82*9 1 


*.1107 


5.0000 


AOHESl VE-80N0ED SCARF JOINTS (ELASTIC-PLASTIC ANALYSIS! 
NON-DI MENSIONAL! ZED FORMULATION 


THERMAL MISMATCHED EFFfc^ENT^^-V^OOO^F OR ^TENSI ON !** ""? 0 5o FoS COMPRESSION 


SCALED 
L/T 
RAT IU 

0.0 

0.20 

0.50 

1.00 

1.20 

1.50 
1.70 
2.00 

2.50 

3.00 

*.00 

5.00 

6.00 
8.00 

10.00 

12.00 

15.00 

17.00 

20.00 

25.00 

30.00 

35.00 
* 0.00 
*5.00 

50.00 


AVFRAGE SHEAR STRESS / MAXIMUM SHEAR STRESS 


0 * BOTH ENDS EQUALLY CRITICAL 

1 * SOFT ET ENO CRITICAL 

2 * STIFF ET END CRITICAL 


0.1 

1. 00000 1 

1.00000 1 

1. 00000 1 

1.00000 l 

1. 00000 1 

1. 00000 1 

1.00000 1 
l. 00000 1 
0.99967 l 
0.78511 l 
0.628*2 l 
0.52655 l 
0 . **9 *2 1 
0.35526 l 
0. 30**3 I 
0.27051 1 
0.23650 1 
0.220*6 l 
0.202*1 1 
0.18193 l 
0.16827 1 
0.15852 l 
0.15121 1 
0.1*553 1 
0.1*099 1 


EXTENSIONAL STIFFNESS (THICKNESS) RATIO 


0.2 

l. 00000 l 
l.OOOOC l 
l.OOOOC l 
1.00000 1 
l.OOOUO 1 
1.00000 1 
1.00009 1 
l. 00000 L 
0.9998* l 
0. 9**30 l 
0.69735 1 
0.6012* 1 
0.53196 l 
0 • **020 1 
0.39160 l 
0.35959 1 
0.32756 1 
0.312*9 1 
0.2955* t 
0.27636 L 
0.26359 l 
0. 25**7 l 
0.2*76* 1 
0.2*23* 1 
0.23810 1 


0.3 

l.OOOOC 1 
l.OCOOO l 

1. 00000 i 

1.00000 1 
l. 0000 0 1 

1.00000 l 

1. 00000 l 
l.OCOOO l 
0.99996 1 
0.99968 1 
0.76086 1 
0.67038 1 
0.60838 l 


0.52260 
0 . 47601 l 
0 • 4463C l 
0.41666 i 
0.40276 1 
0.38716 1 
0.36955 1 
0.35785 l 
0.3495? I 
0.34328 1 
0.33844 1 
0.33458 1 


0 .* 

1.00000 
l. 00000 

1. 00000 

1.00000 
l.OOOCG 
1.00000 
1.00000 
t.ccooc 
1.00000 
0.99984 
0.81886 
0. 73587 
0.67378 
0.60225 
0.55762 
0.53054 
0.50372 
0.491 19 
0.47718 
0.461*3 
0. *5 ICC 
0.4*360 
0. *3807 
0.43378 
0.43037 


0.5 

1 1.00000 1 
1 l. 00000 1 
1 l.OCOOO 1 
1 l. 00000 1 
l l.OCOOO l 
l 1.00000 l 
1 1.00000 l 
1 1.00000 l 
l 1.00000 1 
1 0.99995 1 
l 0.87112 i 
l 0.79611 l 
1 0.7*438 1 
l 0.67301 l 
l 0.63663 1 
L 0.61213 l 
1 0.58855 l 
l 0.57761 1 
l 0.565*5 1 
1 0.55186 1 
1 0.5*292 l 
1 0.53561 1 
l 0.53191 L 
l 0.52827 1 
1 0.52538 1 


0.6 

1. 00000 

1.00000 
l. 00000 
l. 00000 

1. 00000 
l.OOCOO 

1.00000 
l.OCOOO 
1.00000 
1.00000 
0.97C12 
0.85127 
0.805*4 
0.7*833 
0.71293 
0.69033 
0.67C88 
0.66177 
0.65172 
0.6*063 
0.633*3 
0.62838 
0.62*6* 
0.62178 
0.61950 


0.7 

l 1.00000 
1 l.OCOCO 
l 1.00000 
l l. 00000 
l l.GOOCO 
i 1.00000 
I 1.00000 
1 l.OOOOC 
1 1.00000 
1 l. 00000 
1 0.99990 


0.8 


0.9C083 
l 0.86152 
l 0.81317 
1 0.78521 
l 0.76661 
1 0.75020 
l 0.7*32* 
1 0.73562 
1 0.727*0 
1 0.72220 
1 0.71863 
1 0.7160 3 
1 0.71*05 
1 0.71251 


0.9 


1.0 


1 1.00000 l 
1 1.00000 l 
l L. 00000 1 
1.00000 ‘ 
1 .COOOO 
l. 00000 


l 
1 

i i I ooooo i 

l 1.00000 l 
1 1.00000 l 
1 l. OOOOO l 
1 0.99998 1 
1 0.99985 1 
l 0.91187 1 
1 0.87289 1 
l 0.8515* 1 
l 0.83838 l 
1 C. 82615 l 
1 0.82132 l 
l 0.016*6 l 


1.00000 l l. OOOOO l 

1. 00000 l 1.00000 l 
l. OOOOO l l. OOOOO 1 
l. OOOOO l 
l. OOOOO L 
l. OOOOO l 

1. 00000 1 

1.00000 1 
l. OOOOO ‘ 


0.81156 1 
1 0.80869 1 
1 0.80685 1 
l 0.80559 1 
l 0.80*68 1 
| 0.80*00 1 


l. OOOOO 1 
l. OOOOO 1 
0.99996 1 
0.99988 1 
0.92636 l 
0.91169 1 
0.90363 L 
0.89729 1 
0.89*92 l 
0.89297 1 
0.89188 l 
0.89175 l 
0.89197 1 
0.8923? I 
0.99271 L 
0.89309 l 


1.00000 . 

1. 00000 1 

l.OOCOO 1 

1. 00000 1 

1.00000 i 
1.00000 l 
1.00000 1 
1.00000 1 
1.00000 l 
0.99998 1 
0.99066 1 
0.963*5 1 
0.960*0 1 
0.95968 1 
0.96031 1 
0.96 189 l 
0.96*98 1 
0.96793 l 
0.97055 1 
0.97282 1 
0.97*79 1 
C. 97650 1 
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A. 4 Computer Program A4EF For Elastic Strength of Stepped-Lap Bonded Joints 

The analysis in Section 5 has been prepared as the FORTRAN IV digital computer 
program A4EF. The program computes the elastic joint strength of any stepped- 
lap bonded joint and prints out the most critical adherend and adhesive stresses 
for each step of the joint. In order to obtain a more complete internal stress 
distribution, each step can be subdivided and a series of shorter steps input 
instead. The input data is printed out to supplement the solution output. 
Eccentricities are excluded from the joint and a symmetric two-sided bonded 
joint is analyzed in which the thicknesses of the two outer adherends are 
lumped together in evaluating the joint strengths. The reason for this is the 
greater utilization of the back-to-back stepped-lap joint than of the single- 
sided joint. A single-sided joint can be analyzed with this program in one of 
two ways. One can add a mirror image of the actual joint and halve the strength 
predicted for this joint of twice the actual thickness and twice the bond area 
or one can change certain factors of 2, identified in the listing, to 1 for 
single-sided joints. The program accounts for arbitrary combinations of adher- 
end stiffness and thermal imbalances as well as non-uniform step thickness 
increments and step lengths. It has been used successfully in optimizing the 
joint proportions in order to maximize the joint strength. 

A complete listing of the program A4EF follows after the input and output have 
been described. 

CARD 1 ; 

FORMAT (12) 

M = Number of configurations (each requiring a complete set of data) 
to be solved. 

CARDS 2, 2A: 

FORMAT (8F10.3) 

TAUMAX = t = Peak adhesive shear stress. 

P 

G = Elastic adhesive shear modulus. 
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+ 


GAMMAX 


y + v = Maximum adhesive shear strain. (This may be set 

e p 

less than y to cover partial loads.) 


GAMMAE 

ETA 


y = Elastic adhesive shear strain. 

e 


= n = Bond line thickness. 


ALPHAO = a = Coefficient of thermal expansion of outer adherend. 

o 

ALPHA1 = a = Coefficient of thermal expansion of inner adherend. 


DELTMP 


= AT 


= T - T 

operating stress-free 

= Temperature differential. 


T . . - T 

operating cure 


SGNLD = +1 for tensile shear load, and 
= -l for compressive shear load. 


ANSTEP = Number of steps in the joint. This serves to control the 
number of adherend property cards read in. 


CARDS 3, 3A, 3B, ..etc.., 3(N = ANSTEP+1) 

FORMAT (7F10.3) 

THICKO(N) = Sum of thicknesses of outer adherends for nth step. 
THICKI(N) = Thickness of nth step of inner adherend. 

STEPL(N) = Length of nth step. 

ETOTR(N) = Net extensional stiffness of outer adherends at nth step. 
ETINR(N) = Extensional stiffness of inner adherend at nth step. 
STROTR(N) = Net strength of outer adherends at nth step. 

STRINR(N) = Strength of inner adherend at nth step. 
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The output is in tabular form with one row devoted to each step or step por- 
tion. Those entries not defined in the input description above are: TAU the 

adhesive shear stress, GAMMA the adhesive shear strain, DELTAO the displacement 
of the outer adherends, DELTAI the displacement of the inner adherend, with 
TOUTER and TINNER being the loads (at) in the outer and inner adherends, 
respectively. 


The more accurate solution is obtained by starting the iterative solution from 
the more critically loaded end. Therefore, in those cases in which the a priori 
identification of the more critical end is not possible, the program outputs 
solutions from each end, and the secgnd one is to be preferred. Such cases have 
been run and the computational procedure in double precision has been shown to 
be sufficiently accurate from either end. The need for this higher precision 
on IBM computers arises from the precision loss throughout the nested do loops 
in the iteration sequence. The greater number of significant digits employed 
by CDC machines has been found to obviate the need for this and the program 
can be modified to single-precision operation on CDC machines in a straight- 
forward manner. 
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CDEC* A4 CC A'V'-PQOIO 

STFPDFn-LAP 4r,Lic<5 I VF-^OMOF^-JO JNTS A4FF0020 

pfpffctiy-fl&'ttc soiutidns 44 cc oo3o 

JOINT ANALYSIS PROGRAM A4F=0040 

SOLUTION CVA^TMCP ADMFSIVE SHF A P STRESS AND A^HEREND ^j«ai (AXJAll A4 CC 0950 

1 STOP'S n l)T OMITS CONSIDERATION OF ADHFSI'/f PFFl STRESS ON THF A4EF0060 

2 GROUND THAT OUT'O <= N n S TC P »S USUALLY SUFFICIENTLY thin for A4 C F0070 

3 PE FL STPFSS PROBLEMS -JOT TO ARISE A4FF0080 

NOT c THAT rr )NV ccGFMCE PROBLEM [s A 0 UT F for stfppfd-IAP joints, EVEN A4FR0090 

1 WITH DOJRt F-po pr l S I ON. S T F 0 S T A K c N HFp = to CONSTRAIN T c NDENCY A4F C 0100 

2 Tf> DIVERGE (BY FREEMNG SOLUTION ON c STFP A t A TJmc) hsvf RCCN A4FF01L0 

3 ADOPTED AFTrp TRYING 3 OTH morf AMD LFSS STRINGENT TECHNIQUES A4 C F0120 

NOT F ALSO THAT CONVERGENCE OIFFICULTIFS AR' ppupLFM DEPENDENT, RE I NO A4FF0130 

1 MOPE S FV E° E F°R R° I T T L f (HIGH MODULUS) ADHESIVES. LOW MODULUS A4F C 0140 

2 A OH r S I V c S PPnv c O A R = f I A B L F TO A CONVERGENT SOLUTION IN ONI V A A4FF0150 

3 STNC.LF PASS STRAIGHT THROUGH THF JOIN T f^om eNO to end, IN A4FF0160 

4 SInolF-PPFCI SION, WI T H ONLY A SMALL LOSS O' 3 ACCURACY IN LATFR A4 c F0170 

5 STFPS. A4EF0180 

THF UNPEPLYINC- 0 1 = F Tf iJL T Y IS ONE OF NUMFRTCAL ACCURACY LOSS IN T HF A4F F 0 19 0 

1 PRFSENCF OF FyTpcvr^y hJGH AOHESIV c SHFAR STPFSS GRADIENTS At A4FF0200 

2 ROTH FNDS op E A r H OF the OUTER STEPS. A4FF0210 

NOT F THAT PROGRAM CANNOT HANOI F RPodcrly A JO I N T WITH SUCH HIGH A4FF0220 

1 OFSinUAl TH'PMAL STRESSES that IT RPEAKS APART PP I OR T 0 A4FF0230 

2 AP°l TCAT T n^| of MFCHANICAI LOAOS, ANSWER F°OM 0N C FNO OF JOINT A4E C 0240 

4 WILL RE 7 E°0 * RUT FROM OTHFR END WILL PE LARGE AMP POSITIVE. A4EF0250 

5 ACTUALLY, thF LATTER ANSWER IS FOP A LOAO n c REVFPSFD SIGN, WITHA4EF0260 

6 THF t HFp MAI ST°=SSES HELPING RATHFR t HAN HINDERING. cijch A A4FEQ270 

7 SITUATION CAN RF SPOTTFO IE THE SHEAR S t pfsS IN THE FORM c R A4FE0280 

8 solution is negative a t the start nc the joint a4EE0290 

DIMCn'TOn TOUTFP(SO), T INNER ( SOI , GAMMAI50I, TAUI50), OFLTAO(SO), A4 c E0300 

1 OEIT All 50 ) , S T E 0 L ( SO ) , thic.KO(50), THIGKH50), ftotR (501, A4EF0310 

2 ft I NR ( 50 ) . STROtpibo), S TP I N° ( 50 1 , STFP(50), THCKN0I50I, A4F=0320 

3 THCKNK50), F T 0UTP(60), C TINNP(50), STRGTPI50I, STRGNR(50) A4 c F0330 

POURLF PRECISION TOHTFp, tjmnER, G& mm A, TAU, DFLTAO, OELTAI, A4EF0340 

L T MAX , TMfN, TtnAD, A, B, C, D, c , F, ALAMOA, OFLT, OFLOLT, A4FF0350 

2 Cl, C ? , C3 , C4, CS, V, STFo, THCKNO, THCKNI , FTOIJTR, FTINNR, A4FF0360 

3 STRGTR, STRGNR. TCHFCK, S T F P L , THICKP, THICKI, ftotr, EtinR, A4FC0370 

4 STROTR, STP T NR , TAUUPP, TAULWP A4FF0380 

PFAP ( 5, 101 M A 4 C F 0390 

10 FORMAT 112) A4FF0400 

C M .FO. NUMRFR of JOINT CON c IGU d ATT0,nS TO be solved A4E C 04 10 

C RF AO IN mat c p i a l opopfrties, A4EF0420 

PO 390 MCOUNT = 1, m A4EF0430 

NPVRS = 0 A4FF0440 

JFLAG = 1 A4FF0450 

C JFLAG I DENT I F I ES End OF JOINT CRPM WHICH ANALYSIS COMMENCES A4EF0460 

RFAD (5,20) TAIJMAX, G, GAMMAX, GAMMAF , ETA, ALPHAO, AL PH A I , A4EF0470 

l DFl TMP , SGNID, ANSTF 0 A4E C 0480 

20 Format ( 8 P 10 • 3 ) A4EF0490 

NSTFPS = AN ST C P A4FF0500 

MS T E PS = NS T FPS ♦ L A4EF0510 

C RFAD IN JOINT GFQMFTRY A4EF0520 

RFAO (5,30) ( ( THICKOIMI , THIFKI(N), STEP(.(NI, ETOTR(N), ETINR(N), A4EF0530 
1 STROTR ( N ) , STRINR(N) ), N = l, m§TEPS) A4EF0540 

30 FORMAT (7^10. 3) A4SF0550 

C CHECK ON CONSISTENCY OF ADHESIVE DA T A A4FF0560 

VCHFC.K = G * GAMMAF A4 C F0570 

p = TftUMAX 7 VCHFCK A4EF0580 

IE ((l.OOl .LT. P) .OR. (0.999 .GT. P)) GO TO 390 A4FE0590 

IF (GAMMAX . G c . GAMMAF) GO TO AO A4EF0600 

C IF NOT, FEOUCF PEAK SH C AR S T RE C S TO LFSS THAN MAXIMUM F L A S T ! C VALIJF A4 C F0610 

tAUMAX = 0 * GAMMAX A4EF0620 

C SET UP PFCUPPING CONSTANTS A4EF0630 

40 Cl = G / ETA A4EFO640 

C2 = 2. * Cl A4FF0650 

C FAC t OP 2. ACCOUNTS FOR RON PING ON BOTH SIDE' OF INNER ADHEPFNO. A4 C F0660 

C 1 IF BONDED ON ONE SIDE n NL Y , REDUCE TO 1. A4EF0670 

50 C3 = ALPHAO * o F L t m p A4FF0680 

C4 = AL PHA I * DFLTMP A4FF0690 

C 5 = C4 - n A4EF0700 

C A4FF0710 

C PRINT ou T INPUT DATA A4 c F0720 

WRITF (6,60) ALPHAO, AI°HAI, DEltmp A4FF0730 

60 FORMAT ( 1 H 1 / , 5 ( 1H07 ( , 11H INPUT DATA//, 1 OH ALPHAO = , F10.7, A4FF0740 

1 13H (PER DEG. F|, 3X , 9HALPHAI = , F10.7, 1 3H ( PFR DEG. F), A4 C F0750 

2 3X , 9HDEL Tmp = , F6.1, °H (DEG. F)//, A4EE0760 

3 1H , 5 X , IHN, 2X , 5HSTEPI , IX, 6H T H1CK0, IX, 6HTHICKI, 4X, A4E C 0770 

4 6HSTRDTP, 5X. 6HS TR I NR , 5X, 5HE T 0 T P , 5X, 5HF T IN 9 //) A4EF0780 

DO 80 N = 1, MSTFPS A4 C F0790 

WRITF (6,70) N, S TFPL ( N ) , thICKD(N), THICKKN), STROTP(n), A4 C F0800 

1 STRINO(N), ETOTP(N), FTINR(N) A4EF0810 

70 FORMAT ( IH , 4 X , 12, 3 < IX , F6.4), 2(iX, F10.1), 2(1X, Fio.l)) A4FF0920 

80 CONTINUE A4FF0830 

C A4FF0840 

C ESTIMATF MAXIMUM POSSIBLE BONO CAPACITY fdr FULL Y-PL A ST I C ADHESIVE A4FF0850 
PBONO = TAUMAX * OLAO * 2. A4FF0860 

C NOTE FACTOR 2. INCLUDED C 0R DDUBLF-StDED JOINT A4FF0870 

C REDUCE TO l. IF JOINT HAS ONLY ONE SIDE BONDED A4FF0880 
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PfC CPCTL Y-=L 4S T T C ROMD CAPACITY Win a - r CLOMPS to !v<;Y , «PT r >T c n = STA3P fi4FFC390 
I jn I A'T SOLUTID*" A K ' n IS SI PA'TF ICAMTLY ( 0W = 5 TH 4 Ai P( A STT C F S T T M A TF A4==0900 

ACTUAL I HAD C A a> AT T tv 'MY ° = 5 I G‘l I = I C A M tl v l = SS IF t HF dmal MTSMITH A4FF0910 

1 bctwFfm 4DHFR c NOS IC CFVF r F A4 c F0920 

SEDUCTION IN I nan TO *CfTI» ,T for LI M !T F 0 ADornrf'o STRENGTH IS AA-F0°30 

I ACCOMPLISHED LATTP IN PROORAM A4FF0040 

PROVinr OUTER LOOP to AOJUST AOHFSIVF PFAK SH c 4R FTRFSS A t start OC AAFF09S0 

1 JOINT FOR CAFFS IN VHICH HThcc AOHF S I VF IS MORF CSITICAL AT A4=F0969 

2 othfr FNO OF JOINT OP ADHF=FMDF AR r moof CRITICAL THAN AOHF S I VF . 64 r F0970 

TAIIIIPP = 2. * TAIJ1AX A4FFDOR0 

TAIII W° = 0 . A4FF0990 

NOT F THAT PROGRAM IS ppfvf(:T = 0 = ROm HANDLING PROBLEM IN WHICH FH=AR A4FF1000 

1 STPFSS IN AOMTSIVE REVERSES SI'ON, WHEN C D MD U T l "M pm$ start rrom A. 4 FF 1010 

2 THE L c S S CRITICAL EMO. SOLUMO*! IS OHtainarlF FROM OTHER FN9. A4=F1020 

NOTE AISO THAT, IF T H= MAXIMUM SHR A 0 STRFSF ANO A p ° 1 I'f’ LOAOS HAVE A4=F1030 

I OPPOSITE SIGNF, JOINT MUST RRCAK APAF T unocr PFSTDUAL "THERMAL A4FFin40 


STRESS A LON f WITHOUT ANY = XT = RA'ALLY APPLIED L ° A 0 , SO MO C A S F F 0FA4=F1D50 


3 PEAL CONCERN 45= ExCLUDEO BY the RESTRICTION above A4EF106D 

DO 290 T = 1, 50 A 4= F 1 070 

TftJ(I) = (TAUUPP + TAULWRI / 2. A4 = F1080 

1= ( T AU ( II .0,T. TAIJMAXI T MJ(l) = TAUMAX A4EF1090 

TF (I .eg. n TA'l(l) = TAUMAX A4FF1100 

SFT INITIAL CONDITIONS A4==lll0 

GAHMA(l) = TS'JIU / r, A4EF1L20 

TOi|Tfp<i) = 5 . v pqonO A 4 r F 1 1 30 

TINN=R( n = 0. A4F=1140 

D E L T A o f 1 ) = o. A4 = F 1 1 50 

DELTA! ( 1) = SONt.D * G.AMMAIII v FT* A4==1I60 

t«4x = io. * Rpn^o A4= r l 170 

t MIN = 0, A4FF11R0 

T|_nAn=5. *PROMn A4F=1190 

OP=RATF ON THE LOAD L = VFL IN !\' T FRM = DI atf LOOP A4=FL200 

LEAVE ADJUSTMENT OF TAUMAX =0R oijtfp | OOP A4=F1210 

TCHFC.K = 0. A4EF1220 

DO 190 IFLAO, = i, N F T c P S A4 r = 1 2 30 

SCHFOX = 100 00 00000000000, A4= = l 240 

DPI 150 NrmiNT = I, 100 A4E= 12 50 

CONV = Pr,cf)CF NEARLY ALWAYS OCCURRED BE T WFEN 20 AND 30 CYCLES IN TEST A4=F1260 
l CASES, BUT T H = R = WERE SD«F EXCEPTIONS A4E = 1270 

INTERMEDIATE LDOP ADJUSTS LOAD IEV=L A4EF12R0 

TLOAD = TOUTER ( I FI AG) A4 = F1290 

CwfCK DM CnNVFRD,FNC= OF TOU T EP ( T FL AD ) A4E=I300 

p = T 0UT =R ( I C L A 0 ) / SCH=CK A 4 F F l 310 

IF ( (1.000000001 .(IT. R) .AND. (0.999999999 .LT. P) ) 00 TO 160 A4F=1320 

DO 100 H = I r L AD, , N S T E P S A4 = =1330 

INNFR L O nD COMPUTES ELASTIC JOINT S T T =NG T H A4 =fi 340 

A =. T All ( N I A4 = F l 350 

ALAMOA = OSORTir? * (i. / F TINR(NI + l. / c TnTR(N>)l A4E = 1360 

R = <tinn=R(N) / E T INR ( N I - T-ujTrR(NI / ETOTR(N) *■ C 5 * SONID) A4=F1370 
1 * Cl / ALAmpa A4E= l 3R0 

NOTE THAT SGNLO SIGNIFIFS WHETHFR SHFAP LOAD IS TFNSILF OP C HMPR F SS I VE A4 E = 1 390 


C = ST co !_( N) 
D = Al A mda * 
F = OSTNH(P) 
F = DCOSH(D) 
T AU ( N+ 1 1 = A 
DEL T = (2. / 


ADHERFNO. 


* c ♦ R * F 

AlAMOA) *(A*F + R*(E- l.M 
EAC T 0R 2. ACCOUNTS FO? BON D I NO ON BOTH SIDES OF INNER 
1 ir PONDED ON 0^!r SIDF ONLY t RFOUC^ TO I. 

T 0 UTfP<M + n = TOIJT^r ( nj ) - oELT 
T TNNEP<N+ 1 ) = TTNNFR(N) + O^LT 
I F (N * FQ. NSTFPS) CO Jn 90 

TF ( T ? NN C R ( N + 1 ) .L T . (-1. * T nuTFR(l))) GO TO 130 
I F ( TOUT FP ( N + l ) • L T # (-1. * TOU T E D (1)1) GO TO 140 
NOT F THAT THE^F CONVERGENCE CHECKS AR F CRITICAL 

IF THE FACTOR -1 TS FITHFR TOO LARGE OP TOO $ VA L L t CONVFRGFNC^ ^ATLS 
90 DFLOLT = (2. / ( ALAMOA**2) > * <A* (F-l.) + P ^CF- D)) 

FACTOR 2. ACCOUNTS F OR BONOTNG nw BOTH SIDES OF INNER AOH F R p ND * 

L IF BONDED ON ONE SIDE ONLY, RFDUC C TO 1. 

DELTAOINM) = DE l T AO ( N ) ♦ C3 * C ♦ C GNLD * 

1 DFLOLT) / FTOTR(N) 

DFLTAT(N + l) = DELTA I < N ) 

1 DELDLT) / FTINRIN) 

GAMma ( 1 1 = T AU ( N+ 1 ) / 

100 CONTINUE 

CHECK WHETHER OP NOT PRECI^FLY 100 PERCENT OF LOAD HAS TRAMS c EORFD 
R 1 = T OUTER ( l ) / TTMMFPI MSTERS) 

CHECK ALSO WHETHER po NOT CONVFRGEMCF HAS RE FN OBTAINED 
R? = T CHECK / T INNER ( MSTFPS ) 

IF ( (1.000001 .GT. ci) .ANO. (0.999999 .L T . PI) • AN°. 

1 ( 1*000001 *GT . » 2 ) .AND. ( 0 . 900999 u 9 ^3) ) GO T 0 ?D 0 

IF ( T OU T £ R ( 1 ) .LT. TINNER(mSTFPS ) 1 GO Tn 110 
IF cn f LHAD ESTTm/\tc ts Tnn |_o W 
IE NOT, l^AD ESTIMATE IS T 0 n HIGH 
GO TO 120 

P-1 IS UNSUITABLE epP A CONVERGENCE CHFCK BECAUSE NFGATTVE VALUES OF R1A4EF1740 

1 REPRFSFNT T QO HIGH A l OAD ESTIMATE, JUST LIKE THOSF VALUES IN A4EF1750 

2 EXEESS OF UNITY A4FF1760 


(TOUTER(N) ^C- 
> C4 * C + SGNLO * (TINNFR(N) * C + 
G 


A 4 E c 1 400 

A4FC 1410 
A4E F 1 42 0 
A4F e 1430 

A 4EE 1440 

A4 C F1450 
A4 C c 1 460 
A4 C F 1470 
A4 C FI430 
A 4 E E 1 490 
A 4 C F 1 5 0 0 
A4EF 15L0 
A4EFIS20 
A4FFI530 
A 4 C E 1 540 
A4F E 1 5 SO 
A4EE i960 
A4EE 1670 
A 4 FE 1580 
A4EF1S90 
A4EF1600 
A4 C F 1610 
A 4 EE 1620 
A4EF l 630 
A4EF1640 
A4EF1650 
A4FF1660 
A4EF 1670 
A 4E F 1680 
A4EF1690 
A 4FF l 700 
A4EF1710 
A 4 C F 1 720 
A4EF1730 
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oo^nnnoo noo^oo; r> nn noon oono c^>o 


110 TMTN = TOUTCPMPLAG) A 4 Frl 770 

TOUTED ( I PL AG ) = (THIN ♦ T M A X 1 / 2 . A 4 PP 1790 

TCHFCK = T TNNFP( MSTFf>s ) A 4 PF 1790 

GO TO 150 

120 TMAX = T 0 IJTF 0 ( IFLAGI A 4 P -1310 

TOUT c D ( IFLAGI = (THIN ♦ TMAX) / 2 . A^FF 1520 

TCHFCK = T INMER( MSTEPS » 

GO TO 150 A 4 FF 1840 

NOTF THAT LAB C LS 26 AND 7 G 0 VF®M FINF AOJIJSTMFNTS TO THF JOINT LOADS, A 4 FF 1850 
1 WHILE LABFLS 27 ANO 25 REPRESENT COARSE ADJUSTMENT A 4 F C 1860 

130 TMAX = T 0 UTER( I P LAG) A 4 EF 1870 

SCHFCK = T 0 U T ER( IFLAGI A 4 FFJ 880 

TOUTFRf IFLAGI = (THIN ♦ TMAX) / 2 . A 4 PF 1890 

GO TO 150 5 t££} 2?2 

140 THIN = T OUTER ( I P LAG) 5 *^J 2 iS 

SCHFCK = TOUTFP ( I FL AG I A 4 FF 1920 

IF AOHFRFNO, BATHFP t HAN ADHESIVE, LI M !TS JOINT STRFNGTH, NFFD TO A 4 FF 1930 

1 ROOST PLOAO IN ODOPOPTION TO TAUMAX, EVEN IF IT MFANS EXOFEOING A 4 E C 1940 

2 AOHFPENO STPFNGTHS IN INTERMEDIATE COMPUTATIONS, CORRECTIONS A 4 C F 1950 

3 ARE A° PL I FO L A T E P A 4 EFJ 960 

IF ( T M I N ,GF. TMAXI TMAX = 5 . * TMAX 44 e F 1970 

TO(JTFP( IFLAGI = (THIN + TMAX) / 2 . A 4 FF 1980 


150 CONTINUE 

IF (N .FQ. NST F °S I GO T" 190 

CONVFPGFNCF WILL NOT PROCEED TO fad END OF JOINT IN SINGL C PASS 

1 RFrtySr nF NUMERICAL ACCURACY PRO Q L p MS. R C HFDY IS TO F0EF7F 

2 EARLIER VALUES , WHICH HAVE CONVERGED ANO SLIGHTLY PERTURB 


A4EF1960 
A4 e F 1970 
A4FF1980 
A4 e F 1 990 
A4FF2000 
A4 C F?010 
A4 p F2020 
A4E p 2030 


3 INTFDMFDIATC VALUFS, ANO TO CHFCK C 0 P CONVERGENCE AT THF FAR ENOA4FF20^0 
TMAX = T0'.ITEP(1» f^f£2050 

tmin = -1. * TAX Jilelnin 

GO TO 190 A4FFR070 

160 I COUNT = I FL AG ♦ 1 ?tle 2212 

IF { TOUTFP ( ICOIINT ) ,GT. 0.1 GO TP 170 A 4 FF 2090 

IF (TOUTED (ICOUMT I .IT. 0 .) GO TO 180 A 4 FF 2100 

TMAX = T OUT eo ( 1 I / 10 . 

TMJM = -1. * T m A y A4FF2120 

GO TO 190 A4EF2130 

170 tmax = 1.1 * TniJTEP ( ICOUNTI A4EF2140 

▼ M I M = 0.9 * T OUTFR ( I r HUNT I A4 p F2l50 

GO T° 190 A4Fr2l60 

180 tmin = 0.9 * TOUTCPI ICOUNTJ A4F P 2170 

tmin = l.i * rmjTco nroMNT) a 4 ff 21 bo 

THF LIMITS ABOVE APT CRITICAL IN FNSLIRING CONV c RGENCF A4EF2190 

1 THEY MUST BF NEITHER t OO LARGE NOP TOO SMALL A4EF2200 

190 CONTINUE a tetllln 

HRtfPS * 1 A4EF2220 

~ A4EF?230 

200 IF < <C5 . GT. 0.000001 ) .OP. < G 5 .LT . -0.000001) ) GP 240 

IF NPT , FTPST SOLUTION M AY p F SCALED TN THF ABSENCE OF ANY THERMAL A4E C 2250 

1 MISMATCH BETW p FN ADHPPFNHS * 4E P 2260 

IF SPt SOLUTION M(JST REFINED P Y T TFR ATTONf SINCF THERMAL S t RFSS A4FF2270 
l TERMS 00 NOT SOME LINEARLY, PV P N FOP ELASTIC ADHESIVE ANO A^PF2?30 

7 AOH^p PVOS A4F p 2290 

c ' A4FF 2 3 00 

APPLY SCALF FACTOR Tfl SOLUTION FOP ONLY AOHFPENO STIFFNESS IMBALANCE A4F C ’2310 
ASCFotaik] W H E t H p R INTERNAL LOADS A^E CRITICAL FOP FLASTIC ADHFSTVF OP A4E p 2320 

"i WH j:thFp OTHFP FM9 OF JOINT IS mhdc CRITICAL FOP A OHF S I V r A4FF2330 

PROGPAM ASSUMES AOHFPFMO AtLOWAPLFS HAV C SAM^ MAGNITUDE in TENSION AS A4FF2340 


1 in compression. distinction is usuai ly unimportant since, in 

2 OPACTICAI JOINTS, RESIDUAL THERMO STRESSES ARE UNI. I ^ LELY T n 

3 RRFAK AOHFPENO { S ) RATHF C tmanj ADHFSIVF 
RSTALF * T OUTER ( 1 ) / STPOTPIl) 

IF I R S C A L f .LT. o.) 0 S C A t F = -L. # P S C A LF 
PT Ail MV = T AU ( 1 ) / TAMPAX 

IF (RTAIJMX .LT. 0.1 PTAUMX = -1. A PTAU^X 

00 220 N = 2, MST C PS 

RINP = TINNFP(N) / S TR I NR < N ) 

IF < R I N R .L T . 0 .) RINP = - 1 . ^ RINP 
IF (RTNR . GT . RSCALF) R SC A L F = R T NR 
IF <N .FQ. MS t FP S ) GO TO 210 
RQTP = T OUT FR ( N ) / STpPTP(N) 



IF 

( ROT p 

.LT. 

0.) ROTR 

= -l. * 


IF 

( ROT P 

.GT. 

RSCALF) 

PSCALF = 

210 

R T A U = taU(N) 

/ T AU M A V 


TF 

( PT Ml 

.LT. 

0. ) PT6U 

= -1. * 


IF 

(PTfil.) 

.GT. 

P T AUMX ) 

P T AUMX = 

220 

CPNT TNUF 
RFCTR = 

PSCALF 




RFCTft IS PROPORTIONALITY CONSTANT GOVERNING F L AS T IC SOLUTION 
IF RTAUM\X .GT. PSCALF, 40H C SIVF PLAS T ICITY CAN TMfpCASF STRTNGTH 
USUALLY A OH F S I V p IS CRITICAL at on p FNO Oc JOINT OR OTMcp f SO P T AUMX 


A 4 P ^ 2350 
A4E f 2 360 
A4F f 2 370 
A4EF2390 
A4FF2390 
A 4 C c 2 400 
A 4 C F ?4 1 0 
A 4F F 2420 
A4F F 24 30 

A4FF2450 
A 4 p F 2460 
A4FF2470 

A4FF2490 
A4EF2500 
A 4FF 2 510 
A4FF2520 
A 4F F2 5 30 
A4E c ? 540 
A4FF p 5 50 
A 4E f 2 560 
A4 C F?570 


• GT. 1. MAY W p LL JUS t c I GN T p Y THAT FA» FNP OF JOINT IS CRITICAL A4EF2590 

. i . « n i I ^ . t V A 4111 T l I f n , I * I i f% I I G n Cn(3 fTBCPCTC (DC A /. C C T COA 


NOTE THAT PPpGPAM ASSUMES THAT AMY T N T E° N AL AOHF D EN0 STRESSES OF 


A 4 C c 2 500 


[ pcycRSFO SIGN WITH PFSPCfT TO STRFSS OUTSIDE THE JOINT *P C NOT A4 C ‘=?600 
> EPITICAL. T c THFY AP f jT m c A n S THAT THF JOIM T WILL FAIL Dl? c A4 p F26lO 

\ TO R F S I DU AL T HFPMAL STPe^^pc; ALONE WITHOUT ANY MECHANICAL 10A0S A4FE2620 
IF (PSCALF .LT. PTAllMy) vrrjo - RTAUMX A4 r F2630 

OO ?30 N = 1, ESTEPS A4EF2640 
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on r>r> non o r> o ~> oom 


TOUTFR(N) = T n»|TFR(M> / °FC T R 
TfMlsjro(M) = TT^M pc MNl / R F C 
T AIM N ) = TAIJIN) / "Frro 
GAMMA (N) = GAMMA (M) / pcrrp 

DFLTALMN) = D F L T A n ( m ) / RPfTo 

230 n F l T A M N ) = O r L T M(A;i / rfftp 
r,n tp 3lo 

USF ITPPATIV/P Sri'lTION WHEN A D H c 0 c M D TMFRMAL MT$MATCH IS prf<;fmt 
A SC ER T A IN WHF t HFR TNTcofsJM L O A n 6 \RF CRITICAL F n P PLASTIC AOH c< dV 
1 WHFTH^P OT H c P r N n OF JOINT I S mopf fPITICAl C 0P A 0HF S I V r • 

?40 PSFALF = TOUTPPfll / S T ROTPfn 

IF (PS0A1. C ,l T . 0*1 °SFALE = -l, * OSCALF 
QTAUVX = T A l J ( \ ) / TAIIMAV 

IF fPTA'IMX . LT . 0*) RTAO^x = -l. * OTAtJMX 

P0 26 0 N = 2, mstcds 

R I NR = TIMNFRIN) / STRPJP(N-M 

NF ED TO C OM P A p c LOAD WITH STRFNGTH ON THIN SIDE OF ST^p. HFAjrr ( f\|- I) 



IF 

(PIN 0 

.L T . 

0. ) 0 T N° * -1. 


R I N p 


IF 

IRINF 

.GT. 

ortalE) pscalf 

s 

PIMP 


IF 

(N .ED 

. MSTFPS) GO tp 2S0 




PPTQ = TOUT FC ( M ) / STROTRIN) 




IF 

( ROTP 

.LT . 

0. ) ROTP = -1 . 

i*e 

ROTP 


IF 

{ onTQ 

.G T . 

0 S C A L F ) PS r Al.F 

= 

QPTO 

260 

p T All = T A> • ( N | 

/ TAIJMAX 



IF 

{ «T All 

.LT. 

0. ) RTVJ = - l. 

rtt 

R T AU 


T C 

(RTAU 

.0 T . 

DTA'JMy) Q t au m X 

= 

R T MJ 

260 

CONTINUE 






A 4 CC 2650 
A4FF2660 
A4E C 2670 
A4EF26B0 
A4 CC 2690 
A4 c F2 700 
A4FF9710 
A4FF2720 
A4EF2730 
OR A4FF2740 
A4FF2750 
A4 C F2 760 
A4 C F 2770 
A4EF27R0 
A4 C f 2 790 
A4FF2800 
A4EF2810 
A4 C F 2020 
A4 c F 2R30 
A4FF2340 
A4EF2850 
&4FF2860 
A4rF2370 
A4E F2880 
A4EF2890 
A4 r c 2900 
A4 r F 29 10 
A 4E F 2920 

PHPCK okj CONVEP0FMC r A4 c c 2930 

P = PTAIJMX A4EF2940 

J p (RTAUMX .LT. P SF A L r I 0 * PSCALF A4FF2950 

I f { ( 1*00001 .GT. P) •* A N 0 . (0.999OQ ,L T , R I ) GO Tn 3L0 A4 cp 2960 

V/ = 2. * TAIJMAX A4 cp 2970 

p = (V ♦ t&ijmpp) / fv * x A 01 WP ) A4 C F 20 80 

TF f (1.00001 .GT, P) .AND. (0. 99999 .LT. R ) ) GO TO 310 A4 r F2990 

IF FTTHFP RTAUMX OP D SC A L~ .GT. IJNTTY, T All f i ) MUST. *E DFCR c AS c D A 4 FF 30 OO 

T c ( (RTAtJMX .G T . 1.00001) .°R. (RSCAL C .GT. 1.00001) ) GO Tn 2 70 A4 CC 3010 

jp 3PTH ptaiimx AND R S 0 A L E AP E .LT. \ IN TTY, T AU(1) MUST R c INCREASED A4 C F3020 
IF { (RTAUMX .IT. 0.99009) .^NO. (PSCAL C .LT. 0.99999) ) GO Tn 2R0A4 cc: 3O3O 

tc UOMF nr TMF T HQ F F rn-CKF ARP V r T$ M F T t S^LU T I0N HAS F AILED T 0 A4E C 3040 

1 p V F R G c WITHIN S D FG!FTF n NUM n EP OF TTFRATjn fc JS. PRINT PUT ANS W c p A4 rc 30 SO 

A4 z T 3060 

T A I J ( l ) A4 c F307Q 

' r AU(l) A4F^30B0 

A 4 P F 3090 

T A IJ( 1 > A4FF3100 

TAU(l) A4 CC 3110 

A4EF3120 

IF PROGRAM oofs ppyno^ opcopppiuG CnNTTMijF STATpmfnt f SOLUTION) HAS N0TA4EF3130 
l C OA'\(F P OF D A4FF3140 

W° I T F (6,300» A4f F3150 

300 POPM^T (1H1, 18H3IV CD GF'’‘|T GQI M T T HM) ft't cc 3160 

A4F ;: 3 170 

PRINT nil T RFSULTS OF 'PLASTIC CCINPiJTaT I ON S ft^rF^lSO 

310 WPITF (6*3201 T OUTER ( 1 ) * T aUM4X, SGNl 0, OFLTMP A6FC3I90 

320 FORMAT (INI/, n(lH0/>, . S^EH?2 

1 39H ELASTIC JOINT STP C NG T H * D LOAO (LBS) = . F10.1/. A4FFT210 

2 49H ALLOWABl E Ar>HFSIV c ^ HF A ° STRESS, T AUMAX (PSD = * F3.1/, A4FP3220 

3 1H , 8HSGNL9 = t F4.1, 54H SC.MLO = +1 F"B TFNSTLE SHEAR AND -IA4 = F3230 

4 FOP rOM°R c SS! V F /* 36H TEN°EPATU p F 0 I FF C R C NTT AL (OFO F) = * F6 . 1 / / A4F F3 240 

5* 1H , 5X * IHN, 2X, 5HSTFPL, IX, 6HTHICK0, IX, 6HTHTCKT, 3X, A4FF3250 

6 3HTAU, 4 X , 5HC,AM«A , IX, 6HPFLTA0 , IX, 6H0ELTAI , 5X, 6HTOIITFP, A4EF3260 

7 SX, 6HSTR0TD, 5X, 6HTTNNFR, 5X, 6HSTRINR//) A4EF3270 

00 340 N ■ l, «S T Ft><; A4FF3280 

WRITF (6,330) N, STEPL(N), THICKO(N), THICK I ( N ) , TAU(N), G A NM A ( N ) , A4E F 3290 

1 OELTAO(N), OEL T A I ( N ) , T n UTF° ( N ) , STPOTPIN), TINNER(N), STP I NP( NA4 C E3300 
2) A4E c 3310 

330 FORMAT (1H , 4X , 12, IX, P6.4, IX, F6.4, IX, F6.4, IX, F7.1, IX, A4EF3320 

I F 6 . 3 , IX, R6.4, IX, F6.4, ]X, F10.I, IX, F10.1, IX, F10.1, IX, A4EF3330 

? cio. I • A4 C F 3340 

340 COMTIMUF A^|P|3S0 

350 CONTINUE A4EF3360 

A4FF3370 

RFCOMPUTF SPLUTTON FROM n x H c P END OF JHIN t i IF APPROPRIATE A4 C F33B0 

NOTF THAT, IF COMPUTER POINTS °UT TWP SOLUTIONS TO A G I V p N PROBLEM BY A4EF3390 
l R f VFP ^ TNG ENDS AND PE-ANAL v ZTNGt I T I S BECAUSE THE FIP^T FAIL p D A4 C F3400 
Tn rONV r PG C f FV C N TF THF ANSWERS PRTMTFO SEFM T9 SUGGEST A4EF3410 

nTHFRWTS c . TH^ S ECONO S n LUTinN IS T n BE PREFEPRFD, PAR T t CUL APLYA4EF 3420 


GO TD 14 
270 1 E (TAU( 1) 
T F ( T A ij ( 1) 
GO Tp 290 
2P0 IF ( T A!J ( 1 ) 
IF (TAIj(l) 
290 PON TINUF 


.GT. 0.) r ALP JPR 
.LT. 0.) T A UL W p 

.GT. 9.) T MIL WR 
.IT. 0.1 TAUUPP 


2 

3 

4 

5 


IF TT STARTS AT that f^q q p THF JOINT AT WHICH THE ADHESIVE A4FF3430 

SHEAR STRESS IS AT ITS HIGHEST, A4E P 3440 

C IDENTIFY CRITICAL END OF JOINT A4FF3450 

C AVOID REVERSING FN O c BACK AGAIN 

IF (JFLAG .EQ. 2) GO 390 *** 1111 $ 

IF (NRVRS .FO. 1) GO TO 360 

C IF SO, SOLUTION HAS FAILED TO CONV c PGEt SD TRY AGAIN FROM OTHER END A4EF3490 
C ACCURACY AT FAR FND oc JOIN T MAY BE POOR IF FAR END IS CRITICAL A4 C F3500 

IF ( (TAUIMSTEPS) .LF. TAU( 1 ) ) .AND • ( TAIJ( MST r PS) .GE. ^^2512 

l (-1. * T AUf 1 ) ) ) ) GO TO 39D A4EF3520 
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noon 


IF, AT FAP FNO OF JOINT, TAH(MSTFPS) *GT * TAM(l) AT NE A 0 FND. 

1 FAIIUPF TO CONVFPOE may SIMPLY THF RFSUL t of THF FAP FND 

2 nF THF'jniNT RFjfYO MORF CRITICAL THAN THF STARTING ( NEAR ) FND 
RE V C P S F DATA ANO PFANALYZF 

360 no 370 N = If MS T F PS 
STEP(N) = ST ERL INI 
THCKNO(N) * THICKO(N) 

THCKNKN) = THTCKMN) 

FTOUTR(N) = FT FIT R ( N ) 

ETINNMN) = FTTNR(N) 

STPGTR(N) * STROTR(N) 

370 STRGNR(N) = STPINMN) 

00 380 N = I, NSTFPS 
STEPL(N) * STFP(MSTFps - N) 

THICKO(N) = THCKNIIMSTFPS - N 1 
THTCKMN) = thCKND( MSTFPS - N ) 

FTOTR(N) = FTINNR(MSTFPS - N ) 

FTTNR(N) = ETODTR ( ^S T EPS - N) 

STPOTR(N) = STROmri MS T FPS - N) 

380 STQINR(N) = STRGTP( mstfps - N) 

STFPL ( MST^PS) = STFPfMSTFPS) 

THICK 0( M S T F p S ) = 0. 

THICKM M$ TC PS) = THCKN0C1) 

ETOTR ( MS Tr PS ) = 0. 

FTTNP( MSTFPS) = E T PUTR f l ) 

STPOTRI MSTEPS) = 0. 

STRINP(MSTFos) = STRGTDC1) 

V = ALPHA 0 
At PHAO = ALPHA! 

ALPHA! = V 
JFLAG = 2 
NRV&S = 0 
GO TO 50 
390 CONTINUE 
STOP 
END 


A AFF 35 30 
A4 C F3540 
A4EF3550 
A4FF3560 
A4EF3570 
A4E C 3530 
A4F F 3590 
A 4E F 3600 
A4FF3610 
AAEP3620 
A 4 C F 3630 
A4FF3640 
A4EF3650 
A4EF3660 
A 4FF3 67 0 
A4 F - 36 90 
A 4 C F 3690 
A4EF3700 
A4FF3710 
A4 C F 37?0 
A4E F 3730 
A4 r F 3740 
A 4 C F 3 750 
A4E C 3760 
A4FF3770 
A4E p 3730 
A4E c 3790 
A4 c F 3800 
A4FF3810 
A 4F F 38 20 
A4E c 3830 
A 4E F 3 840 
A 4 C F 38 50 
A4E p 3860 
A4EF3870 
^ 4E F 38 90 
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INPUT OATA 

AlPHAO * 0.0 (PFR DEG. f) ALPHA! » 0.0000050 (PER DEG* M OELTMP 

N STEPL THICKO TH1CK1 STRGTR STRINR ETOTR ETINR 


0.0 IDEG. FI 


1 0.0750 

2 0.0750 

3 0.0750 
A 0.0750 

5 0.0750 

6 0.0750 

7 0.0750 

8 0.0750 

9 0.0750 

10 0.0750 

11 0.1250 
l? 0.1250 
13 0.1250 
1 A 0.1250 

15 0.1250 

16 0.1250 

17 0.1250 

18 0.1250 

19 0.1250 

20 0.125^ 

21 0.1250 

22 0.1250 

23 0.1250 
2A 0.1250 

25 0.1250 

26 0.1250 

27 0.1250 

28 n . 1 250 

29 0.1250 

30 0.1250 
****** 


0.26AC 
C.26AC 
0.26V? 
0.2650 
0.264? 
0.2200 
0.2200 
C. 22 A 0 
0.22C9 
0. ?2?C 
0.176? 
0.1 760 
0.176? 
0.1760 
0.1760 
C. 1320 
C.13?" 
0.132? 
0.1320 
0. 1320 
0.089'' 
0.099? 
0.C89? 
0.0000 
0. ? 80" 
0.0443 
C.0440 
0.04^? 
C • C 4 4? 
0.0440 

c.o 


".0300 
C.90?" 
0.030'' 
0.0300 
C.330" 
C.074- 
C.C740 
0.074? 
O.C 74? 
7, C 74 *> 
? • l 1 9 ^ 

C. 11 80 
0.1190 
0.11 30 
'*.11 9C 
0.1620 
? . I 6 2 " 
0.1670 
C .1620 
0. 16?" 
0. 2"6D 
9 . 2 " 6 0 
0, ??6" 
0.2*60 
3.2C60 
".25") 
0.25CD 
0 . 2 5 C 0 
3.25?" 
0.25?'* 
0 . 2 5.0 0 


1821 6.0 
1921 6.0 
19716.C 
19216.0 

1921 6.0 

15190.0 

15180.0 
15180. C 
15180.0 

15180.0 

12144.0 
12144 . r 
12144.0 
12144.0 
12144.0 

91C3.0 
9 1 " B • 0 

9108.0 
91 08.0 
9109.? 
6? 72 . C 
6C72.0 
6C72.0 
6CT7 2.C 
6? 72 . 0 
3036.C 
3 0 3 6 . C 

3036.0 
3C36.C 
3036.0 

n * 


3900. C 
390° .0 

3930.0 

3933.0 
3900. C 
9620." 

9620.0 
962C .0 
9620.0 
9620.0 

15340. C 

15340.0 
15343. G 

15340.3 
15340. 3 

21060.3 
21060. C 
2106C.C 

21060.0 
2106?.? 

26780.0 

26790.0 

26790.0 

76790.0 

26790.0 

32530.0 

32500.0 
32500.0 
32500.'' 
32500.0 
32500. C 


211200 C.O 
21 120HC .0 
2112C0C.0 
211200C.C 

2112003.0 
1 76"0C" • 0 

1760000.0 

1 760000.0 
1 7600 CO. 0 
l 7 6 ? " C ? .0 
140300C .0 
14C300C .0 

1609000.0 
1 408C 0? • ? 

1408330.0 
105600C . 0 

1056090.0 
1O56030.C 
105600C.C 
1C 56000 .0 

704000.0 
7"409Q • 9 
7GA00C.C 
7C400C.C 
704C00.0 
35200C.0 

352000.0 
352000. C 
35200C.C 
3520CC.0 

0.0 


ELASTIC JOINT $ T RFNOT H. °L0AD ILDS) * 
ALLOWABLE ADHESIVE SHE A 3 S^FSS. TMJMAX 
N * 1*0 N * *■ 1 p 0R T F V| $ I L E SHEAR AND 

TEMPERATURE DIFFERENTIAL IDc? fj * C, 


7828.0 

(PSU * 6000.0 

-1 FOR CQMORFSSIVE 


STEPL THICKO THICK! 


GAMMA DELTAO DELTA! 


1 0.0750 0. 

2 0.0750 0. 

3 0.0750 C. 

A 0.0753 0. 

5 0.075? 0. 

6 0.0750 0. 

7 0.075? C. 

8 0.C75C 0. 

9 0.C75C 0. 

10 0.0750 0. 

11 0.1250 C. 

12 0.1250 C. 

13 0.1250 0. 
1A 0.1250 0. 

15 0.1250 0. 

16 0.1250 0. 

17 0.1250 C. 

18 0.1250 C. 

19 0.1250 0. 

20 0.1250 0. 

21 0.1250 OJ 

22 0.1250 0.1 

23 0.1250 0.1 
2A 0.1250 0.1 

25 0.1253 O.i 

26 0.125C O.i 

27 3.1253 0.< 
?8 '*• 1250 0. 

29 0.1250 0. 

30 0.125? 0. 

31 ****** o. 


3 1 3 3 f " 

• . : 3 '*o 
?.?3?? 
:/ 3 ?o 
: . " 7 4 ? 
3. 0740 
? . ? 7 4C 

? . : 74? 

r ,? 740 
? . I 1 8C 
". 1 180 
?. 1 l 80 

C . 1 1 °c 
''•1190 
162C 
0. 1670 
0. 1620 
?. 162? 
0.1420 
C • ? " 60 
0 ♦ 2 36 r 
0.2C60 
0 . 2?6? 
:.2360 
? . 25?0 
3 • 7 5?0 
' . ? 6 4 n 
>}, 2^0? 

7.2500 


6 000.0 

3434.6 
2 1 ?4 . 7 
194D. 7 
2245. 9 
3 ^ 4 9 « r 
7^69.1 
1826.4 
L 447. 6 
l 7 0 0.0 
22 74. q 

1225. 1 

767.4 

480.6 

922.6 

1410.6 
855.2 

545.4 
519.8 
765.0 

143 8.6 
4 74.0 
401*3 

401.5 
675. A 

1410.0 
513. C 
?70.4 
3 72.6 


.loo o.c 

• ? 5 9 ?.' 
."39 0.- 
# "32 ?.' 
.037 0. 

.3 54 0.-' 
.039 0.- 
. ? 3C ?.’ 
.027 0*' 
.03? C.l 
.033 ?.' 
.020 Q.i 

.013 9. 

• Oil O.I 
.315 O.i 
.027 C. 
."14 <?,< 
.009 C.i 
.009 C. ; 
.013 O.i 
.023 0. 
.?li Ov 

.00 7 O* 1 
.007 0.' 
.011 0. 
."24 C. 
. ? " 9 0. 

• ?C 5 C. 

6 "• . 

• ° 1 6 C. 
."46 0. 


0.0005 
0.0906 
0.0007 
C.C009 
0.0012 
0.0015 
0.0C16 
C.0018 
0.0020 
0.0022 
0.0024 
C.O? 2 7 
0.0029 
0 .0032 
0.0035 
0.0039 
O.OCAl 
0 • 0044 
0 • 0046 
0.0049 
0.0052 
0.0054 
0.0057 
0.0059 
0.0062 
O.C-364 
0 . 0066 
3.0069 
3.0071 
C. ?C 73 
O.OC 75 


PLASTIC JOINT STRFNGTH, "lOA? < l F» S > * 6764.? 

ALLOW ABL F ADHESIVE SHEAR STRESS^ TAUMAX 

n » io n = fo<? tensile shear and -i for co u pressive 

TEMPERATURE DIFFERENTIAL ( OEG F) = C.C 


STEPL THICKO TH1CKI 


GAMMA OELTAD DELTAI 


1 0.0750 Ow 

2 0.075? 0.2 

3 0.0750 

4 0.0750 0.2 

5 0.0753 0.2 

6 0.0753 0.2 

7 0.0753 0.2 

8 0.075? ? . 2 

9 0.0750 0.2 

10 0.0750 0.2 

11 0.1253 ?.! 

12 0.1250 c.: 

13 0.1253 0.1 

14 0.1253 

15 0.1253 0.: 

16 0.1250 

17 0.1253 C. 

18 0.1250 0. 

19 0.1250 C. 

20 0.1253 3, 
2! 0.1250 O.i 

22 0.125C C. 

23 0.1250 0.' 

24 C.1250 o.i 

25 0.1250 C. 

26 0.1250 0. 

27 0.1260 0. 

28 0.1250 0. 

29 0.1250 0. 

30 0.1250 0. 
****** ?. 


0.?7C0 
O.C 3 r ? 
0.0 30 0 
''.0 300 
0.C3G0 
0.0740 
r • C 7 4 ^ 
? .C740 
0.074C 
" .0740 
0.118? 
0. I l 8" 
0. 1 IHC 
-*7.118? 
0.118? 
r -,l62? 
G . I 6 2 C 
0.1620 
3.1623 
0.1620 
r . 60 

5.2060 

C.2C6? 

3.2060 
0.2360 
0.25TO 
0. 2600 
".25"0 

'9.250? 
9, ?503 
0 .2500 


90°°. C 

3133.7 
1 232.3 

889.9 

1673.5 

4574.4 

2158.4 

1 188.9 
1016.1 
1524.2 

3053. 7 

894.2 

309.3 
?6 8. 9 
7? 1 .9 

2370.6 

663.3 
22 3.0 
2CR.9 
594.0 

2 1 1 4 . 0 
492.8 

130.6 

140.7 
6?4. 3 

2164.5 

334.8 

54.3 

90.3 

633.4 

4301. 8 


O.C 

C.0C02 
C.0""4 
0.0006 
C.OCC0 
•3.0010 
C.0012 
0.0014 
".0016 
3.0017 
? • 0? 1 9 
0.0022 
C.002 4 
C.0027 
0.0029 
0.0032 
0 .00 34 
0.3037 
0.3C39 
9."?4l 
0.0043 
0.0046 
C.0048 
0 .0050 
0.0052 
0.0054 
C • 0056 
’ 3.0058 
0.0060 
0.0062 
0.0063 


0.CC92 
C. 0003 
0.0005 
9.0CC6 
C.OOC9 
0.3C1 l 
0.0012 
0.0014 
0.0316 
0. 00 1 8 
0.0020 
0.0022 
0.0024 
C.OC27 
O.OC 3? 
0.C032 
0.0034 
f . ? ? 3 7 
0.0039 
0 * 004 1 
?. *"44 
C.O 346 
0.0048 
0.0050 
0.0C52 
C.CC54 
0 . 0" 56 
0.0058 
0.0060 
0.0062 
0.0064 


480CD0.0 
- 480030.0 
480000. C 
480000 • 0 
40OCOO.O 
1 184C"3 .0 
1104CO9.C 
1184COO.C 
1 194000. C 

n "4000 .o 
1088000 • 0 , 
t898"?0.C 
1000000,0 
1889? 0 O.C 
1833 "OO.C 
25<>2C00.0 
2592CO0.C 
2592C00 .0 
2 5 9 2 C 0 C .0 

2592000.0 
3296OC0.0 
3296000. C 
3296000. C 
3296000. C 
3296CC0.0 

4300000 .0 

4000030.0 

4000000.0 
i,nc r COO .0 
4000C0C .0 
4C0CC00.0 


7828 .0 

7132.8 

6705.6 

6394.6 

6039 . 3 

5681.3 

5259.9 

4950.9 

4694.4 

4440.8 

4140.8 

3719.5 

3479.6 

3305.3 

3112.4 

2807.4 

2511.4 

2343.3 

2215.4 
2061.2 

1800.3 

1553.0 

1425.3 

1330.0 

1202.2 

954.7 

735.2 

645.7 
572. ? 

421.3 
O.C 


18216.0 
18216.0 
18216.0 
18216.0 
18216.0 
15180.0 
15180.0 
15180 .0 

15180.0 
15190. C 

12144.0 
12144.0 
12144.0 
12144.0 
12144.0 

9108.0 

9108.0 

9108.0 

9108.0 

9108.0 

6072.0 
6072.0 
6072.0 
6072*0 

6072.0 

3036.0 
3036.0 
3036.0 
3036. 0 
3036 .0 

C.O 


0.0 
695.2 
1 122.4 

1433.5 

1738.7 

2146. 7 

2568. 1 

2877.1 

3133.6 

3387.2 

3687.2 

4108.5 
4348.4 

4522.7 

4715.6 

5020.6 

5316.6 

5484.7 

5612.6 

5766.8 

6027.7 

6275.0 

6402.7 

6498.0 

6625.8 

6873.3 

7092.8 

7182.3 

7255.7 

7406.7 

7828 .0 


TOUTEft 

* STRfl TR 

TINNER 

6764.? 

18216.0 

0.0 

5Q32.4 

18216.0 

8 31.8 

5633 . 1 

18216.0 

1131.1 

5487.7 

18216.0 

1276. 5 

5311.9 

18216. C 

1452.3 

4883.6 

1518C .0 

188C .6 

440 3.8 

15100.0 

2369.4 

4165.3 

15180.0 

2598.9 

4008.2 

15180 .0 

2756.0 

3327.1 

1513C.0 

2937.1 

3500.9 

12144.0 

3263.3 

3C62.6 

12144.0 

3701.6 

2°29 .C 

12144.0 

3835.2 

2864.8 

12144.0 

3099.4 

2757.0 

12144. C 

4007. 2 

2415.9 

9108.0 

4348.3 

2091. 8 

91C8.0 

4682.4 

1984.2 

91C8.C 

4780. C 

1936.7 

9108 .0 

4827.5 

1846.3 

9103.6 

4916.0 

1550.0 

6972.0 

5214.2 

1272.4 

6072. C 

5491.8 

1 205 . 1 

6072.0 

5559.1 

1 1 75.3 

6072.0 

5538.9 

1 106.6 

6072.0 

5657.6 

822.3 

3036.0 

5941.9 

585.5 

3036. 0 

6178.8 

551.0 

3036.0 

6213.2 

537.1 

3036.0 

6227. 1 

470.6 

3036.0 

6293.6 

•0.0 

O.C 

6764.2 
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A. 5 Computer Program A4EG For Elastic-Plastic Strength of Stepped-Lap Bonded 
Joints 

The elastic-plastic strength of stepped-lap joints is covered by the analysis 
in Section 6. The digital computer program A4EG has been prepared as a design 
tool for the analysis of such joints. By printing out detailed internal 
stresses, the program can serve to aid in design improvement by changing the 
joint proportions in such a manner as to reduce the load transfer in the more 
critical regions and to increase it in those less severely loaded areas. 

In addition to those features of the elastic solution A4EF, this elastic- 
plastic program A4EG seeks the existence and extent of any plastic adhesive 
zones within any step or step portion. The convergence of the nested itera- 
tive do loops is complicated by the addition of an extra loop accounting for 
the maximum adhesive shear strain. This is only rarely a known quantity for 
ductile adhesives because the end step of the stiffer adherend is usually the 
most critical detail. 

A complete listing of the program A4EG follows. Precisely the same input data 
is used as for program A4EF and the output format is the same except inasmuch 
as A4EG prints out separate elastic and elastic-plastic solutions. 
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CDECK A4EG 

C ST C PPf D-L AP ADHFS [ V c - BONDED- JO I N TS 
CLASTIC-PLASTIC SOLUTIONS 
JOINT ANALYSIS PRnC,RAM 

PROGRAM CAN BE US^n m DPTIMT7E JOINT DESIGN PROPORTIONS 
SOLUTION EXAMINFS ADHESIVE SHEAR $tq f SS AND adhprend NORMAL 


(AXIAL) 


STRFSS BUT OMfTS CONSIDERATION OF ADHF.SIVE PEEL STPFSS ON THE 
GROUND THAT nijTf=p cnjD ST^p is USHALtY SUFFICIENTLY THIN EpR 
ppcL STRFSS PROBLEMS MQT TO ARISE 
THAT CONVERGENCE pphplfm i$ ACU^F Fno STEPPED-LAp JOINTS, EVEN 
WITH DOURL c - po ECTSION. STF p S TAKFN HERE TO CONSTRAIN TENDENCY 
TO DIV CQ GE ( *Y FREEZING SOLUTION ONE STFP A T A TIME) HAV C B E C N 
ADOP T *0 AFTEP TRYING BOTH VORF AND LESS STRINGENT TECHNIQUES 
ALSO THAT CONVERGENCE OT c E ICULT IES ARE PROBLEM HEP END C NT t 8 C I NG 
MORE SEVERE eop BRITTLE (HIGH MOOULUS) ADHESIVES* LOW MODULUS 
ADHFSIVFS PROVFO AMENABLE TO A CONVERGENT SOLUTION IN ONL* A 
SINGLE PASS STRAIGHT THROUGH THE JOINT F° OM E^p TP C ND, jm 
SINGLE-PRECISION, WITH ONI Y A S M AL L LOSS OE ACCURACY IN LATFR 

THE UNDERLYING DIFFICULTY IS ONE OF NUMERICAL ACCURACY LOSS IN THE 
l U PRESENCE OF FXTRFMEtY HIGH ADHESIVE SHEAR STRESS GRADIENTS A T 
2 BOTH ENDS QE EACH OE the OUTER STEPS. 

PROGRAM HAS BEEN ADAPTED TO RUN ON CDC COMPUTERS IN SINGLE PRECISION 

1 BUT ONLY WORKS INTERMITTENTLY IN SINGLE PRECISION ON IBM MACHI NFS A4FG0240 
OIMCNSION TOUTER (1501* TINNFR(150), GAMMA ( 1501 , TAUI150), A4EG0250 

1 DEL T AO ( l 50 ) ♦ DELTA! ( 1501 * STEPL(SO)* THICKQC50), THICKI(50), A4EG0260 

2 ETO T R ( 50 ) t ET INR( 50 1 , ST*DTR(50lj STRINR(50), STFP ( l 50) , , c ^ t JAEG0270 

3 THCKNO (150), THCKNT ( 1501, P toijtr ( 1 50 ) , ETINNP(150), S TPGTR ( 1 50 ) t A 4EG02B0 

^DOUBLE^PREC IS! ON T OUTER , T \ NNER , GA MM A , TAIJ, OELTAO, DELTA I 


1 
2 
3 

NOTE 

1 

2 

3 

NOT F 
1 
2 

3 

4 

5 


A 4EGOO I 0 
A4EG0020 
A4F00030 
A4-G0040 
A4 C G0050 
A 4 C G0060 
A4EG0070 
A4EG0080 
A4EG0090 
A4EG010D 
A 4 C GO l 1 0 
A4EG0120 
A4EG0130 
A4EC0 1 40 
A4EG0150 
A4EG0I60 
A4ECf)l70 
A4EG0180 
A4EG0190 
A4EG0700 
A4EG0210 
A4EG0220 
&4EG0230 


1 

2 

3 

4 

5 


TM AX* TM I N f A. B, C, D, 
C4 , C5, r 7, CIO, V, V4, 
THCKNO, THCKMI, ETOUTR , 


THICKI, ETOTR, FTINR, STRQTR, STRINR, 
GAMLWR, FLSTR, XP, EL, ELMAX, c LMTN 

read (5,10) M 
10 FORMAT (12) 

M • EO • NUMBER OF JOINT CON r I GUR AT TONS 
READ IN MAT FR I AL PROPERTIES 
DO 820 MCOUNT - i, M 
NPVPS - 0 
JFLAG * I 

JFLAG IDENTIFIES END OE JOINT PROM WHICH 


E, F, AL AMD A , DELT, DELDLT , Cl, c2, C3, 
V5, V6 , V7t V8, V9, V10, STEP* TCHECK, 
FMNNR, STRGTR , STRGNR, STFPL, THTCKD, 


TAUUPR, TAULWR, GAmijPR, 


TO BE SOLVED 


ANALYSTS COMMENCFS 


REAP (5,20) TAUMAX, G, GAMMAX, 

I OELTMp* SGNLD, ANSTEP 
20 FORMAT ( BE 1 0 • 3 ) 

NSTEPS * ANSTEP 
MSTFPS = NSTEPS ♦ 1 
LMAX * 3 * NSTEPS 
MCHECK = LMAX + l 

C READ IN JOINT GEOMETRY 

READ (5,30) ((THTCKOfN), THICK I ( N ) , 

1 STROTR(N), STPINR(N)), N * I, 

30 FORMAT (7*10.31 

C CHECK ON CONSISTENCY OF ADHESIVE DATA 
VCHECK = G * GAMMAE 
R =• TAUMAX / VCHECK 

IF ((1,001 *LT. P) .OR • (0*999 .GT. 
IF (GAMMAX • GE . GAMMAE) GO TO 40 
C IF NOT, REDUCE PFAK SHEAR STRFSS TO LESS 
TAUMAX * G * GAMMAX 
GAMMAE * GAMMAX 
C SUM LAP LENGTHS 

40 OLAP = STEPL(l) 

00 50 N = 2, NSTEPS 
50 OLAP = OLAP ♦ STPPL(N) 
i CHECK 
1 

2 


GAMMAE, ETA, AlPUAO, ALPHA I , 


. . STFPL ( N ) , 
MSTEPS) 


ETOTP(N), ETINR(N), 


R11 GO td 820 
THAN MA XT M UM ELASTIC VALUE 


A4EG0290 
A4EG0300 
A4 C G03 1 0 
A4EG0320 
A4EG0330 
A 4 FG0340 
A4EG0350 
A4EG0360 
A4EG0370 
A4E00380 
A4EG0390 
A4*G0400 
A 4EG0410 
A4 EG0420 
A4EG043 0 
A 4EG0440 
A4EG0450 
A 4EG0460 
A4 C G0470 
A4EG0480 
A4EG0490 
A4EG0500 
A4 C G05 10 
A4EG0520 
A4EG0530 
A4EG0540 
A4EG0550 
A4 C G0560 
A4EG0570 
A4EG0580 
A4EG0590 
A4 C G060D 
A4EG0610 
A4EG0620 
A4EG0630 
A4EG0640 
A4EG0650 


A4EG0660 

r»N THE CONSTANCY DF THE TOTAL THICKNESS OE THE STE p PED-LAP JOTA4FG0670 
N T AOHERENOS IS NOT PROVIDED BECAUSE STRONGER JOINTS ARE OBT AI Nf DA4E00680 
BY MATCHING THF ADHEREND FXTENSTONAL STIFFNESSES AT THE ENDS OE £^55^22 
THF JOINT AND MAINTAIN I NG THIS TOTAL APPROX! MATFLY CONSTANT THR OU A4EG0700 


ON THF 


* GHOUT the LENGTH OF T H c JOINT, THE OMISSION OF A CHECK 
1 ADHEREND THICKNESSES m\ke$ THE PROGRAM MORE VERSATILE. 

SET UP RECURRING CONSTANTS 
40 Cl * G / ETA 

FACTOR 2, ^ACCOUNTS FOR BONDING ON BOTH SIDES OF INNER ADHEREND. 
1 IF BONDED ON ONF SIDE ONLY, REDUCE TO 1. 

C7 = -1. * GAMMAE 
CIO * -1, * TAUMAX 
C3 * ALPHAO * DELTMP 
C4 * ALPHA! * DELTMP 
C5 * C4 - C3 
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A4EG0710 

A4EG0720 

A4 C G0730 

A4EG0740 

A4EG0750 

A4EG0760 

A4EG0770 

A4EG0780 

A4EG0790 

A4EG0800 

A4EG0810 

A4EG0820 


A4EG0830 

PREPARE FOR SEPARATE COMPUTATION OF POTENTIAL AOHESIVE SHEAR STRENGTH A4EG0840 
1 ON ASSUMPTION OF ACTUAL A DHFRFND STIFFNESSES £ INFINITE $TR FNGTHA4EG0850 
KADHSV = 0 A4EG0860 

* u A4EG0870 

PRINT OUT INPUT DATA A4EG0880 
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oo n noonnon -ioonor>nonr»nnnnnnno oooooooo 


70 WRITE (6,80) AL PH40 , ALPHA! , DELTMP 

80 FORMAT ( 1H l / • 5(IH0/), 11H INPUT 0 ATA//, 1 OH ALPHAn *= , Fl0.7 f 

1 13H (®FR DEG. F) f 3X, 9HALPHA! = , F10.7, 1 3H (PER DEG. F), 

7 3X f 9H0ELTMP = , F6.1, 9H ( DEG# F>//, 

3 1H , 5X , 1HM» 2X, 5HSTEPL , IX, 6HTHICK0, IX, 6HTHI CKI , 4X, 

4 6HSTRHTR, 5X , 6HSTR I NR , 5X, 5HFTOTP , 5X, 5HFTT NR / / I 

no 100 N * l, MS TCD S 

WRITE (6,90) N, STEPL ( N ) , THI CKO ( N ) , THICKI(N), STROTR(N), 

1 S T P T NR ( N ) , ETO TO ( N ) t ETTNP(N) 

90 FORMAT (1H , 4X, T2, 3(1X, F6.4), 2(IX, FlO.l), 2(IX, F10.l>> 

100 CONTINUE 

IF ( K A OHS V .F0. 1) GO TO 410 

START WITH ELASTIC ANALYSIS 

PROCEED TO ELASTIC-PLASTIC ANALYSIS ONLY IF ADHESIVE IS morp CRITICAL 
1 THAN A DHE° END ( S ) 

NEED ELASTIC SOLUTION TO IDENTIFY CRITICAL END fqp ELASTT C -PL AST I C 

1 SOLUTION WHFN BOTH thermal AND STIFFNESS ADHFRFND MISMATCHES 

2 ARF PRES r N T 

ESTIMATE MAXIMUM POSSIBLE POND CAPACITY FOR FULLY-PL A STI C ADHFSIVE 
PPOND * T A U M A X * OLAP * 2. 

NOTE FACTOR 2* INCLUDED FQP OOUBLE-STOFD JOINT 
REDUCE TO i. IF JOINT HAS ONLY ONE SI^E BONDED 

PERFECTLY-FL ASTIC BOND CAPACITY WILL BE CLOSER TO ASYMPTqTf q c SCARF 
l JOINT SOLU T T ON AND IS SIGNIFICANTLY LOWER THAN PLASTIC ESTIMATE 
SCARF JOINT STRENGTH F$TfMATE WOULD BE THE LESSER OF PBCND = 2 • *T AUMA X 
1 *0LAP*(Firi)/(E?T2) AND PBOND = 2.*TAUMAX*0LAO* ( F2T2 ) / ( FI Tl ) 

NOTE, HOWFVFR, THAT STEPPED-LAP JOINTS EXHIBIT CHAR AC T*R I S T I CS OF 

1 DOUBLE-LAP JOINTS TO THF EXTENT THAT THE LOAD TRANSFERRED ON ANY 

2 ONE STEP IS INDEPENDENT OF THAT STEP LENGTH ONCE T HE LENGTH 

3 EXCEEDS A TRANSITIONAL VALUE. LIKEWISE, THE TO^AL LOAD t RANSFER 

4 BECOMFS INOEPFNDFNT OF F4CH AND FVFPY (LONG) STFP IN THE JOINT 
ACTUAL LOAD CAPACITY MAY RF SIGNIFICANTLY L C SS I c THFRM4L MISMATCH 

l BETWEEN ADHERFNDS IS SFVFRF 

REDUCTION IN LOAD T 0 ACCOUNT FOR LIMITED AOHFREN^ STRENGTH IS 
1 ACCOMPLISHED LATFP IN PROGRAM 

PPPVIPE OUTER LOOP T 0 ADJUST ADHESIVE PEAK SHEAR STRAIN AT START OF 

1 JOINT FOR CASFS TN WHICH F I THF R ADHESIVE IS MOP= CRI TIT AL AT 

2 OTHER END Of JOINT OP ACHFRFNns ARF MORE CRITICAL THAN ADHESIVE. 
TAUUPR = 2. * TAUMAY 
TAULWR * 0. 

NOTF THAT PROGRAM IS PPFVFNTFD FROM HANDLING PROBLFM IN WHICH SHEAR 

1 STRESS IN ADHESIVE REVERSES SIGN, WHEN COMPUTATIONS START fpqm 

2 THE LESS CRITICAL END. SOLUTION IS OBTAINABLE FROM OTHER END. 
NOTE ALSO THAT, IF TWF maxIMIJM SHEAR STRESS AND APPLIED LOADS HAVE 

1 OPPOSITE SIGNS, JOINT MUST BREAK APART UNDE^ PESmUAL THERMAL 

2 STRFSS ALONF WITHOUT ANY EX T ERNALLY APPLIED LOAD, SO NO CASFS OF 

3 RFAL CONCERN ARF EXCLUDED BY THF RESTRICTION ABOVE 
DO 310 T * It 50 
TAU(l) = (TAUUPR ♦ TAULWR) / 2. 

IF (TAU(l) .GT. TAUMAX) TAU(l) * T AIJMA X 
IF (I .EO. 1) T AIJ ( 1) = TAUMAX 

SET INITIAL CONDITIONS 

GAMMA! 1) = T4U( l ) / G 
TOUT c P ( 1 > = S. * PBOND 
TINNFR(l) = 0. 

DELTAom = o. 

DELTAUl) * SGNLD * GAMMA(l) * ETA 
TMAX = 10. * PPHND 
TMIN = o. 

OPERATE ON THE LOAn LEVEL TN INTERMEDIATE LOOP 
LFAVE ADJUSTMENT OF TAUMAX FOP OUTFP LOOP 
TCHECK = 0. 

Dn 210 IFLAG = 1, NSTFPS 
SCHECK * 1000000000000000. 

Dn 170 NCOUNT = l, LOO 

C CONVERGENCE NFARLY ALWAYS OCCURRED BETWEEN 20 AND 30 CYCLFS IN TEST 
C 1 CASES, PUT THERE w c RE SOME EXCEPTIONS 
C INTERMEDIATE LOOP ADJiJS T S LOAD LEVEL 
VIO * -X. * TDUTFR ( 1 ) 

C CHECK ON CONVERGENCE OF TDIJT F D ( I FL AG) 

R * TOUTERf IFLAG) / SCH c CX 

IF ( (1.000000001 .GT. R) .AND. (0.999999999 .LT. P) 

DO 120 N = IFLAG, NS T F PS 
C INNFR loop COMPUTFS ELASTIC JOINT STRENGTH 
A = TAU(M) 

AL AMD A a nS0R^(C2 * (l. / E T I N R ( N ) ♦ l. 

B » (TINNFR(N) / FTTNR(N) - TOUTFP(N) / 

1 * Cl f ALAMDA 

C NOTF THAT SGNLD SIGNIFIES WHFTHFP SHEAP LOAD IS TENSILF np cnMP°ESSTVF 
C * STEPL(N) 

C 


) GD TO 180 


/ ETOTR(M) ) ) 
ETOTR(N) * C5 * 


SDN! D ) 


D * ALAMOA * 
E * DSINH(O) 
F * DCOSH(O) 
TAlMN+l) * A 
DELT * (2. / 


* F ♦ B * f 

A1AMDA) *(A*E + B*(F- l.|) 

C FAQTOP 2. ACCOUNTS c OR BONDING ON BOTH SIDES OF INNER 
C l IF BONDED ON 0N= SIDE ONLY, REDUCE to l# 


ADHFRENG. 


A4EG0890 
A4EG0900 
44EG0910 
AAEG0920 
A4EG0930 
A4EG0940 
A 4EG0950 
A4EG0960 
44EG0970 
A4FG0980 
A4FG0990 
A4EG1000 
A4FG1010 
A4EG1020 
A 4F G1 030 
A4FG10A0 
A4FG1050 
A4EG1060 
A4FG1070 
A 4 C G 1 080 
A4EG1090 
A 4F0 1100 
A4FG1110 
A4FG1120 
A4EG1130 
A4 C G1 1 40 
A4EGIL50 
A4EG1160 
A4EG1170 
A4EG1180 
A4EGH90 
A4EG1200 
A4EG1210 
A4EG1220 
A4EG1230 
A4FG1240 
A4EG1250 
A4FG1260 
A 4E G 1 2 70 
A4FG1280 
A4 F G 1290 
A4EG1300 
A4 C G 1310 
A4 C G1320 
A4EG1330 
A4FG1340 
A4EG1350 
A4FGI360 
A4EG1370 
A4FG1380 
A 4FG1 390 
A4 C G 1400 
A4EG1410 
A4EG1420 
A4FG1430 
A4 C G 1440 
A4EGL450 
A4EG1460 
A4 C G1470 
A4FG1480 
A4 C G 1490 
A 4 C G 1 5 00 
A4EG1510 
A4FG1520 
A4FG1530 
A4EG1540 
A4EG1550 
A4EG1560 
A4FG1570 
A4FG1580 
A4F01590 
A4 FG 1600 
A4EG1610 
A4FG1620 
A4 C G 1630 
A 4EG 1 640 
A4EG1650 
A4EG1660 
A4EG1670 
A4EG1680 
A4F G 1690 
A 4 C G 1 700 
A4EG1710 
A4EG1720 
A4EG1730 
A4EG1740 
A 4EG 1 750 
A4EG1760 
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nno ionnoon') o no nnnn noon on ono 


TPUTfo<NM> = T n UTFR(N) - PEL T 
TIMNfp<N+1) = TINMFR(M) ♦ DFLT 
TF ( N . EQ. MSTFPS) GO Tn no 
TF C T ft U ( N+ 1 ) .l T . CIO) GP TO 150 
TF ( TPIJtcq ( n + 1 ) V L 0 ) GH to mo 

C NOT^ that THES C CnNVFRGCMCF CH r CKS A D F CRITICAL 
C T c THE FACTOR -1. is T oo L A P 0 f OP mo SMALL, CONVERGENCE 
110 OELOLT = ( 2 • / (ALAM0A**2)) * (A* < p - l. ) ♦ B * ( E 
C FAC T QR 2. ACCOUNTS p OP nONDTNG Oft! ROTH SinES OF INNER 
C 1 IF BONDED ON nw= RTDE ONLY, PrniJCE Tn 

= D C L T AO ( N ) ♦ C3 * C ♦ SONL9 * (TOUTFP(N) 
ctotp (N) 

= DEL T A n N ) ♦ C4 * r ♦ SONLO * (TJNNFP(N) 
ft T NR ( N ) 

TAU(NM) / G 


DELTA0( Mf 1 ) 
l OELDLT) / 

DELTAIC N+l) 

1 OELOLT) / 
GAMMATM+l) = 


FAILS 
- 0 )) 

AOHPc^p, 

* C - 

* c ♦ 


130 


140 


120 C0NTINM c 

C CHFTk WHFTHFR QP MOT PRFfIS c LV r 100 RECENT 0 C LOAD HftS TRANSFERRED 
R 1 = TOUT E R ( 1 ) f T TNNEP ( MSTFPS ) 

C CHFCK ALSO wh c thfd no NOT CONVERGENCE HAS BEEN OBTAINED 
o 2 = T CMCfK / TTNNFPCMSTCPR) 

TF ( <1.000001 .r,T. Dl) .AND. (0.999999 .IT. PI) .AND. 

1 < 1.000001 • GT . R7) .AND. < 0,999990 ,LT. 92) ) GO TO 220 

IF fTOIjTFR(i) .LT. TTNNFd(MSTFPS) ) GO TO 130 
C TF SO, LOAD FSTIMATF is t 00 LOW 
C IF NOT t LOAD FSTIMATF IS TOO h I GH 
GO Tn i^o 

P l IS UNSUITABLE FOP ft C ON V c ° GF*’C c CHECK BECAUSE NFGATIVE VALUES OF R 
1 OPPPPSCMI TOO HIGH A L n A D FSTTMATP, JUST LIKE THOSF VALUES IN 
7 EXCESS OF UNITY 
TMIN = TOUT Fp ( I F L A G ) 

TOU T FPf TFL AG) = <tm!N ♦ TMAX) / 2. 

ICHFCK - T INNER! MSTFPS ) 

GO TO 170 

TMAX = T OIJT E R ( TFLftG) 

TOUTFPf IFLAG) = (Tmjn ♦ TM ft x ) / 2. 

T C H F C K = T INNEP( m$TE°S) 

GO TO 170 

NOT F THAT LARFLS 76 AND 7 GOVERN FINF ADJUSTMENTS Tn THF JOINT LOADS, 
l WHILF LABELS ?7 AND 23 REPRESENT COARSE ADJUSTMFNTS 
150 TMAX = TOtJTFDf IFi_ AG ) 

SCHECK = Toijtcp ( IFLAG) 

TnuTFo ( IFLAG) = (TMJN ♦ tmax) / 2. 

GO T 0 170 

T M * N = T OUT fp ( I ct AG) 

SCHFC^ = TCHJTFRC IFLAG) 

ADHERFND, OATHFO THAN ADHESIVEt LIMITS JOINT STRENGTH, N c ED TO 

1 BOOST PLOAD IN PROPORTION TO TAUMAX, EV p N IF IT means EXCEEDING 

2 ft OHF P C ND STPFmgthS IN INTERMEDIATE COMPUTATIONS, CORRECTIONS 

3 ARE A P PL 1 ED L A T FR 
IF (TMTN .0 c , T^AX) t MAX = 5, * TM A X 
TOIJTERC IFLAG) = < T MTN + TMAX) / 2. 

C OMT I MU r 

IF <N ,EO. NSTFPS) G° T 0 210 

CONVERGENCE WILL NOT PROCFED To FA* END OF JO T N T IN SINGLE PASS 

1 BECAUSE OF NUMERICAL ACCURACY PROBLEMS. REMEDY IS T 0 FREF7E 

2 farlIFR VALUES, WHICH HflV c C0NV c RGFD AND SLIGHTLY OFRTtJRR 

3 I mtfrmED TATE VALUES, AND to CHFCK FOR CONV c PGENCE AT T HF FAR EN 
TMAX = T °U T co ( 1 ) 


160 

IF 


170 


TMIN = -1. * TMAX 
GO to 210 

180 I COUNT = IFLAG ♦ 1 
IF < TOUTFR< ICOUNT ) 
IF < T OUT Fp ( ICOIJNT) 
TMAX = T OiJT c R < 1 ) / 

TMIN = -1. * ™AX 
GO TO 210 
190 TMAX = 1.1 
TMIN = 0.9 
GO TO 210 
200 TMIN = 0.9 
TMIN = 1.1 


.GT. 

.LT. 

10 . 


0. ) 
0. ) 


GO 

GO 


TO 

TO 


190 

200 


T 0UTcr< ICOUNT) 
T OUTER ( ICOUNT) 


T OUTER ( ICOUN T ) 

T OUT C R ( ICOUNT) 
APE CRITICAL TN 


ENSURING CONVERGENCE 


THE BOUNDS ABOVE 

THEY MUST RE NEITHER t^p LARGE N n R TOO SMALL 
210 CONTTNUF 
NR VR S = 1 

220 IF < < C 5 .GT. 0.000001) .op # <C5 • L T • -0.000001) ) Go rn 260 

IF NOT, FIRST SOLJTIOM MAY BE SCAL C D IN THE ABSENCE OF AMY THERMAL 
1 MISMATCH BFTWE C N ADHFQFNDS 

IF SO, SOLUTION MUST BE REFINED BY ITERATION, SINCE T HEP MAL STRESS 

1 TERMS no NOT SCALE LINEARLY, EVEN FOP ELASTIC AOHESTVE AND 

2 ADHERENOS 

APPLY SCALE FACTOR TO SOLUTION fqr ONLY ADHEPFND STI FFNF SS IMBALANCE 
ASCFRTAIN WHETHER INTFPNAL LOADS ARC CRITICAL FOR ELASTIC ADHFSTVE OR 
1 WHETHER OTHER FNn O c JOINT IS MORF CRITICAL FOR ADHESIVE 
PROGRAM ASSUMES ADHFR'NO ALLOWABLES HAVE SAME MAGN I *MjoE IN TENSION AS 
l IN COMPRESSION. ' DISTINCTION IS USUALLY UNIMPORTANT SINCE, IN 


A4 C G1770 
A4EG17R0 
A4 C G 1 790 
A4 C G1B00 
A4EG1B10 
A4FG1870 
A4 C G1330 
A4F G 1 340 
A 4 c G 1 8 50 
A4FG1860 
A4EG1870 
A4EG1880 
A4 C G1890 
A4EG190D 
A4FCiqiO 
A4EG 1920 
A4 C G 1930 
A4FG1940 
A4EG1950 
A4EG1960 
A 4 C G 1 970 
A4EG1980 
A4EG1 990 
A 4 C G 2000 
A 4 E G ? 0 1 0 
A 4E G20 20 
1 A4 C G20 oo 
A 4 c G7040 
A4EG2050 
A4EG2060 
A4FG2070 
A4E G 2080 
A4EG2090 
A4 C G 2 1 00 
A4FG2U0 
A4 C G2 l 20 
A4EG2130 
A 4 f G 2 1 40 
A4E02150 
A 4 c G 7 1 60 
A4FG717D 
A4 C G2 l 80 
A4 C G2190 
A4 C G220D 
A4 C G2210 
A4EG2220 
A4 C G? 7 33 
A4FG2240 
A4EG2250 
A4FG2260 
A4 C G2270 
A4FG2280 
A4EG2 290 
A 4 r 02 300 
A4FG2310 
A4FG2320 
DA4FG2330 
A4EG2340 
A4EG2350 
A4FG2360 
A4EG2370 
A 4 C G23 80 
A4FG2390 
A4EG2400 
A4 C G?4 10 
A4EG2420 
A4E02430 
A4FG2440 
A 4E G 7450 
A4FG2460 
A4EG2470 
A4EG2480 
A4 C G2490 
A4EG2500 
A4E G 25 10 
A4EG2520 
A4FG2530 
A4EG2540 
A4EG2550 
A4EG2560 
A4EG2570 
A4EG25B0 
A4EG2590 
A4 C G2600 
A 4 C G 26 10 
A4EG2620 
A4EG2630 
A4EG2640 
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2 PR ACT T CAL JOINTS, RPSIDUAL TM?i»MU STRESSES ARP IINLIKLFLY t O A4 c G2650 

3 BREAK ADHFRFnD ( S ) RATHFR THAN' ADhcs TVF A4 C G2660 

RSCALF = Tnt|Tcp(n / CTRHTPCn A4EG2670 

T F ( p SC ALP .L t • 0.) RSCH.P = -1. * D SC AL c A4 c G2680 

PTAUMX = TM)(l) / TAUMAX A4F02690 

IP (PTAUMX .l^. o.) RTAffMx = - 1 . * RT&IJMX A4EG2700 

OP 240 N - 2, *STf=PS A 4 C G 27 10 

R I NJR = TTNMCR(M) / s r R T MR ( M- 1 ) A4FG2720 

: 0 STP c NGTu ON THIN' STOP n F STF&. HFNCE thF (N-l) IN COMPARISON A4 C G?730 


IF 

( p TN° 

.LT . 

0. ) 0 I NR - -l. 


P I V R 

A4 c G2740 

IF 

( RINP 

.GT. 

RSCALF ) RSCAIF 

- 

R T M P 

A 4F G2 750 

TF 

( N . ^0 

. MSTFPS) GO Tn 230 



A4-G2760 

pnTR = TOUT ro ( N ) / STROTR(N) 



A4 F G2770 

TF 

( ROTR 

• L T • 

0. ) PO^P = -1. 

* 

POTR 

A4FG2780 

IF 

( ROTR 

.GT. 

DSGA1 c ) P SCALE 

= 

POTR 

A4 C G2 790 

PTAU = T All ( N ) 

/ T AU M A X 



A4EG2800 

f F 

( PTA'I 

.17. 

0. ) ° T A U = -1. 

* 

P T A 1 J 

A4 C G28 10 

IF 

f PTVI 

.GT. 

RTAUMX) PTAUMX 

- 

R T AIJ 

A4 C G2820 


240 CONT!MU c A4EG2330 

PFCTR = R S C A L p A 4 C G2 840 

R FC TR IS PPOPOPT TONAL ITY CONSTANT GOVERNING PLAS T IC SOLUTION A4 C G2950 

IF PT AU M A X . GT . RSCALP, AOHESTVF plASTICTTY CAN I N r R E A S^ STRFNGth A4EG2360 

USUALLY A 0 H f S IV r js CRITICAL AT 0N C E N n OF JOINT OR OTHFR, SO PTAUMX A4 C G?870 
1 . GT . i. way WF! L JUST SIGNIFY THAT FAR END OF JOINT ts r R! T ICAL A4FG2380 

NOT f THftT PROGRAM ASSUMFS T H AT ANY INTERNA! A OH FRF NO STPFSSES O r A4FG2890 

1 REVEPSEO SIGN WTTh RFSpFCT TO STPFSS OUTSTOE THF JOINT APF NO t A4 c G2900 

2 C R I T I C At . IF TMFY A R f » IT MFANS THA T THE JOINT WILL FAIL DU C A4FG2910 

3 TO RESIDUAL THFPMAL STRfSSFS ALONF WITHOUT ANY MFCHANICAL LOADS A4EG2920 


IF ( 0 S C AL c • L T . p T AUMX ) ° FC TR = PTAUMX 
DO 250 N * 1, MSTfps 
T OUT F R ( N ) = TPUTFP(N) / RP r TR 
TTMNERIN) = TINNFR(N) / RPGTo 
T AU I N I = TAIJINI / PFCTP 
GAMMA(N) = GA^MA(N) f RFCTR 
DFLTAO(N) = OFLTAO(N) / RFCTP 
DELTA I ( N ) 


250 0 F L T A I ( M) 
r,n TO 330 


/ RFGTP 


US F ITFpativf SOLUTION WHFN AOHFRFND THERMAL MISMATCH IS R R c SENT 


A4EG2930 
A 4 r G? 940 
A4 C G2950 
A4EG2960 
A4FG2970 
A4 C G2980 
A 4 C G2990 
A 4 C G3000 
A4-G30 10 
A4 EG 30 20 
A4EG3030 


ASCFRTATN WHFTHFp U^^NAL LOADS ARE CRITICAL FOR FLASTTC ADHESIVE OR A4 C G3040 


L WHFTHFp OTHFR r Nj o o c JOU'T is *ORF CRITICAL Fnp ADHFSIV C . 

260 PSCALE = T OUT F 0 ( l ) / STPOTP m 

I c (RSCALF .L T . 0* ) RSCM.E = -1. * » SCALE 
PTAUMX = T All ( l ) / TAIJMAX 

IF (PTAUMX .LT. 0.) ° T A U ** X = 

DO 280 N = 2 * ms T c P S 
RINR = TINN c R(N) / STR.INR(N) 

IF ( R I N R . GT . P S C AL F ) PSGAIF 
IF (N • Eg. MSTFPSI GO to 270 
POTR = T 01 l T ER f N l / STROTR(M) 

IF (ROTR .GT. RSCAL c ) d SCALE = pgtr 
/ TAHMAX 
0 . ) RTAIJ - -I. 

R T A U M X 


•I. * PTAUMX 


* RTMR 


R T AU 

PTAU 


270 PTAU = TALMN) 

IF (RTAU .L T , 

IF (RTAU . GT . PTAUMX) 

280 C PNT I Ml JF 
CHF C K hn CONV c RGFNCF 
R = PTAUMX 

IF (RTAUMX .LT. RSCALF) P = RSCALF 

I c ( (1.00001 .GT, O) .AND. (0.99999 .LT. R) ) GO TO 330 

V * 2. * TAMMAX 

P = ( V ♦ TAUUPR) t (V ♦ TAULWP) 

IF ( (1.00001 .GT. P) .AND. (0.99999 .LT. R> ) GO TO 330 
IF F I TH P R R t AU MX OR RSCALF .GT. UNITY. TAU(L) M UST RE DECREASED 


A4 C 03 050 
A4FG3060 
A4 C G 3070 
A4FG3080 
A 4 E G 3090 
A4EG3100 
A4EG31 10 
A4FG3120 
A4FG3130 
A4FG 3 1 40 
A4 c G 3150 
A 4 c 03 160 
A4FG31 70 
A4FG3180 
A4EG3190 
A4 C G3?00 
A4EG3210 
A4FG3220 
A4EG3230 
A4FD3240 
A4EG3250 
A4FG3260 
A4FG3270 


IF ( ( R T A 1 1 wx .GT. l.OOOOl) .OR. (RSCALF .GT. 1.00001 ) ) GO Tn 290 A4 C G32P0 

IF ROTH PTAUMX AND RSCALF AR E .LT. UNITY. TAIJ(l) MUST RF T NC RE ASFO A4EG3290 
I F ( (PTAtJMX .LT. 0.99999) .AND. (PSCAL C .LT. 0.99999) ) GO T 0 300A4 C G3300 

- - - ' - - * A 4 C G 3 3 1 0 

A4FG3320 
A4FG3330 
A4FG3340 
A4EG3^50 
A4 c G3360 


IF NEITHFR CHF g k is MET, SOLU t ION HAS CONVERGED 
GO Tn 330 

290 T&UIJRR * T AU ( 1 ) 

GO th 310 

300 TAiJt WR = TAUf 1 ) 

310 continue 


|F ORPGPAw GOFS pfydnd PPFcfFDING CONTINUE STATFMFN T t SOtUTION HAS NOTA4 c G3370 
1 G. ON V F 0 GF 6 A4FG3330 

WP1TF (6,320) A4 C G3390 

320 FORMAT (1H1, 18HDTVFRGENT SOLUTION) A4FG3400 

A4FG34 1 0 

PRINT put PFSULTS OF PLASTIC COMPUTATIONS A4FG3420 

330 WRITE (6,340) Tf»UtfR( 1|, T A I jM A X , SGNLD, DFLTMO A4<=G3430 

340 FORMAT (iHl/ t 5(1 HO/ 1 • A4 C G3440 

1 39H ELASTIC JOINT STPFNGTH, PLOAO (LPS) = , Fio.l/, A4 C G3450 

2 49H ALLOWABLE AOHESIV r SHEAR STRESS, TAIJMAX (^SI) - , F8.1/, A4FG3460 

3 IH . 8HSGNLD = , F4.1, 54H SGNLD = +1 FOR TENSILE SHEAR AND -IA4FG3470 

4 cn P COMPRESS! VF/, 36H TFMPFR A TUP f q j p f fp f n T I A L ( DFG F) = , F6. i// A4 C G3480 

5 , 1H , 5X , iMN, 2X , 5HSTFPL, IX, 6H T H I CKO , IX, 6HTHI r Kl. 3X, A4 C G3490 

6 3HTAU, 4 X , 5HGAMWA, IX, 6HDFLTA0, IX, 6HDFLTAI , 5X, 6HTmjTCP , A4FG3500 

7 5X , 6HSTR0TP, 5X, 6HTTNNFP, 5X, 6HSTPINP//) A4FG3510 

DO 360 N = 1, MSTFPS A4FG3520 
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nnnoo^n r> o v *ir> o r> o oo r>o.Toooooo t 


N» STERLIN), TH!CKO(M», THKKHNI, t AI I ( n), r, 4 My A ( N) 
nPL*4I(N), TPUTFR(N), STpotr(n), T INNER CNI * STRtNB( 


IX, E 6 .4 » IX, e 6 . 4 , IX, Eft. 4 , ix 
c 6.4, IX, E10.1, IX, EiO.l, IX, 


, F7.1, 
E10. I , 


IX , 
IX, 


WRITE (ft, 1501 

1 DEI T&ot N I , 

21 

350 FORMAT ( IH , 4X , 12, 

1 F6.3, IX, E 6 . 4 , IX 

2 F10.ll 

360 CONTINUE 

RECOMPUTE SOLUTION erom OTHER FNO OF JOINT, IF APPROPRIATE 
NOTE THAT, IE C0MPtJT c P PRINTS OUT TWO SOLUTIONS TO A GIVEN PROBLEM RY 
pevfpRTNr, cvos ANO oc-anjsl YZ ING, IT IS BECAUSE THE ciRST EAILFO 


1 

2 

3 

4 

5 


SEEN TO suggest 
Prcffrrfo, PARTICULAR! 
WHICH THE aohestve 


TO CPNVFRGE, even it tup ANSWERS PPTNTFD 
OTHFR WISE, THE SECONO SPLU T I0N IS TO RF 
IE IT STARTS AT THAT ENO PE THE JOINT A T 
SHF AR S T RESS IS AT ITS H I GHE ST . 

IDENTIFY CRITICAL FN" OE JOINT 
AVOID REVISING ENDS RACK AGAIN 
IE (JELAG .EQ. 2) GO TO 400 
IP (NRVRS ,E0. 1 ) GO Tp 370 

IF SO, SOLUTION HAS FAIL c 0 TO CONVEPGF, SO TRY AGAIN FROM 0 T HER END 
ACCURACY AT F A P ENO OE JOINT may BE RO0R IF FAR ENO IS CRITICAL 
IF ( (TAU(MSTEPS) ,LF, TMJI1I) .AMO. (TAUIMSTEPSI ,GE. 

1 I-l. * TAU(l)H) GO TO 400 

IF, AT EAR eno OC JOINT, TA'J(MSTEPS) ,GT. TAU(l) AT NEAR ENO, 

1 failure TO CONVERGE nay rf SIMPLY THE RESULT PE THE FAR END 

2 of THE JOINT BEING mpof CRITICAL THAN THE STARTING (NEAR) END 
REVERSE DATA AND REANALYZE 


370 


380 


390 


00 380 N = l, MSTCPS 
STFP(N) = STEPL(N) 

THCKNO(N) = THICKO(N) 

THCKNI(N) = thickTIN) 

ETOIJTR I N ) = ETOTR(N) 

FTINNR(N) = FTTNR(N) 

STPGTR(N) = STROTR(N) 

STRGNRINI * STRTNR(N) 

DO 390 N = L, NSTEPS 

STEPi ( N I = STEPIMSTeps - N I 

thkko(N) = THCKNIIMSTFps - N) 

THICKKN) = THCKNOI MSTCPS - n ) 
ETOTP(N) = FT t NNR ( MSTFPS - N) 
E T I NR ( N I = FT0UT0( MSTFPS - M| 
STROTP(N) = STPGNPf MSTFPS - N) 

STRINR(N) = S T RGTR(MSTF°S - NI 

STEPL ( MSTE ps 1 = STCP( MSTEPE ) 

THICK0( MSTeps | = 0. 

THICK I ( MST c PS I = THCKNOI J ) 
FTOTD( msteps ) = 0. 

FT IMP ( MSTFPS ) = ETPU t °( 1) 

STROTR( MSTEPSt = 0. 

STPINRf MS TC PS) = STRGTOfll 
V = ALPHAO 
ALPHAn = ALPHA! 

ALPHA! = V 
JFLAG = ? 

NPVRS = 0 
GO TO 60 


BYPASS ELASTIC-PLASTIC 
l THAN ADHESIVE 
400 IF ( BSC ALE .0E. RTAUMXI GO 
RECORD F| ASTIC JOINT STRENGTH 
ELSTR = TOIITFO ( 1 ) 


COMPUTATIONS IF 
T 0 820 


ADHERENOS ARF more CRITICAL 


START FL AST l C-Pl AS T I C S0LU t ton 

ELASTIC SOLUTION HAS TnFN T T c IFr> CRITICAL END OF JOINT, AND RFVF&$cn 

1 opnco nr data if mccfssary, so thfpe is no need pop such 

? CAPABILITY Jm THF FL ASTI C-PL AST I c SOLUTION 
ADD F XT R A LOCATIONS INSIQF ST^^S Tr ^ ACCOUNT e 0R POTENTIAL PLASTTC-TO- 
l" claSTTC 4^0 FL AS T TC- T ^-PL ASTIC T R ANS T T I ONS IN AOHESTVF 
410 no 420 N = If MSTFPS 
L = 3 * M 

THC KNO( L“2 ) * THICKO(N) 

THCKN0(L-L) = THICIO(N) 

TMCKMOtL) = THICKOCM) 

THCKNUL-2) = THICKT INI 
THCKNKL-ll * t H[CKHN< 

THCKNI(L) = THTCKMN1 
ETPUTR(L-2) = F t OTR(^) 

FTniJTR(L-l) = c TQTR(N) 

FTOUTP(t) = C TPT»(M| 

FTINN0<L-2) = ET INR ( N I 
ETINMP(L-I) = ft ( M l 
ETINNP(L) = ETINR(N) 

ST*GT0(L-21 = STRO T RtN> 

STRG t <ML- 1) = STROTOINI 
S T RGT&IL> = ST D nT R ( N ) 

STPGNPIL-2) = $TRIN«(NI 
STRnNO(L-l) = STRTNP(N) 


, A4*G3530 
NA4FG3540 
A4EG35G0 
A4 C G3560 
A 4EG3S70 
A4 C G3580 
A4FG3590 
A4FG3600 
A4E G 36 1 0 
A4FG3620 
A4 C G 3630 
A4FG3640 
YA4EG3650 
A 4 C G3660 
A4EG3670 
A4FG3680 
A4EG3690 
A4FC3700 
A4FG37 10 
A4 C G 3720 
A 4EG3730 
A 4 r 03740 
A4FG3750 
A4EG3760 
A 4 C G3770 
A4EG3780 
A4EG3790 
A 4EG3800 
A4EG38 10 
A4EG3870 
A4EG3830 
A4FG3840 
A4EG3850 
A4 C 03 860 
A4EG3870 
A4EG3880 
A4 E G389Q 
A4EG3900 
A4 c G 3910 
A4 C G3920 
A4EG3930 
A 4 C G3940 
A4EG3950 
A4 C G?960 
A4 C G3970 
A4EG3980 
A4EG3990 
A4EG4000 
A 4 c G 4 0 1 0 
A4EG4020 
A4EG4030 
A4FG4040 
A4FG4050 
A4FG4060 
A4FG4070 
A4FG4080 
A4EG4090 
A4 p G4100 
A 4 c G4l 1 0 
A4FG4120 
A4FG4130 
A4EG4140 
A4FG4150 
A 4 C G4 160 
A4F041 70 
A4EG4180 
A4FG4190 
■ A4FG4200 
A4 C G42 1 0 
A4FG4220 
A4EG4230 
54CG4740 
A4 C G4250 
A4EG4260 
A4 C 042 7 0 
A4FG4280 
A4FG4290 
A4FG4300 
A4F04310 
A4FG4320 
A4EG4330 
A 4E G4340 
A4FG4350 
A4FG4360 
A4EG437D 
A4 C G4380 
&4FG4390 
-\4PG4400 
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no r> r>rvm o n r>r> o oo no on 


420 STPONPU ) * STPfNR(N) 


THCKNCM MCHFTK ) 
THC KNT ( MCHECK) 

ftoijtr< m r, m f r k ) 

FTTNMP(MCHECK) 
STPGTQ ( MCHECK) 
STRGNR ( MCHECK) 
C USE OUTER LOOP TO 


o. 

THICKTT MSTFPS ) 

0. 

FTTMP ( n»STFPS I 

0. 

S^R IMP ( M$TFP$) 

ADJUST MAX I MUM ADHESIVE 


SHF AR STRAIN LEVEL 


GAMIJPR = GAMMAX 
GAMLWP = GAMMAF 

C GAMIJPR AMD GAMLWF SERVE AS POUNDS ON SHEAR STRAIN ACTUALLY 
C SET UPPER AMO LOWFR SOUND* ON STRENGTH 
TUPPER = T A UMAX * OLAP * 2. 

NOTE THAT the FACTOR 2. ACCOUNTS FOR SONOING ON BOTH SIDES 
I ADHERENTS, Ie RONDEO DN ONE S T OF ONLY* R eduC F t 0 l* 
TLOWER = E L S T R 

TMAX .FQ. ehlLY-pl AST ye JOINT STRENGTH 
TMIN .FQ. PEPEECTLY-FLAST IT JOINT STRENGTH 
ICHFCK = 0 


DEVELOPED 


DE 


fop i r he r y and jcheck with neither 


GO TO 770 
r FNT T AL BOND 


TO 440 


TF 


IF 

430 


440 

SET 

450 


+ TLOWFP) / 2. 


TOO HIGH FOR TWO CONSECUTIVE 


FQP TWO CONSFCUTIVF ITERATION 


J C H f C K = 10 

NFFr> to S FT OIFEFRFMt VALU c S 
1 EQUAL TO FITHFR \ OP ? 

DP 760 T = It 50 

IF t (KADHSV .FQ. L) .AND. (I . GT . 1) ) 

THIS INSTRUCTION PRINTS OUT SDLU r ION FOP PO 
TMAX = tupped 
TMTN = T 1 OWFR 

GAMMA! 11 = (GAMijpr ♦ GAMLWR ) / 2. 

IF { (KADHSV .EO. 1) .OP. (I .FQ. 1) ) GO 

IE (ICHECK • N c * JCHECK) GO T 0 450 
IF (ICHFCK .FQ. 1) GO TO 430 
NOT, TCHECK .EQ. ? AND LOAD HAS BEEN 
L I T FP AT I ONS 

GAMMA(l) = (GAMMA! 1) ♦ GAMLWR) / 2. 

T C H f c K = 2 
GO Tn 450 

ICHECK .EO. 1, LOAD HAS SEEN TOO L^W 
GAMMA(l) = (GAMMA (1) ♦ GA M UPR ) / 2 

ICHECK = 1 
GO Tn 450 
G AM M A ( 1 ) = GAMMAx 

INITIAL CONDITIONS 
T OUTER ( 1 ) = ( T UP P E R 
TTNNFR(l) = 0. 

TAU(l) = TAUMAX 
DEL T A n ( 1 ) = 0. 

DEL T A I ( 1 ) = SGNLD * GAMMA ( 1 ) 

DP 700 TEL AG = l, NSTfps 
J1 = 3 * IFLAG - 2 
J2 = J 1 + 3 

SCHECK = 1000000000000000. 

DO 640 NCOUNT = 1 f 50 

USUALLY 20 C Y r L F S PE f tpo&t ( ON WERE SUFFICIENT 
MIDDLE LOOP ADJUSTS LOAD L c \/rL 
CHECK CIN CONVERGENCE OF ^OU TC R(JL) 
p = TOUT E o ( J 1 ) / SCHICK 

IF ( (1.000000001 .GT. *) 

Vll = T OIJ T f p ( i ) 

V10 = -1. * Vll 
DO 600 N = TELAG, N S t epS 
INNERMOST LOOP COMoy+cs joint 
L = 3 * N - 2 
ST*=P(L ) = STF^f (N) 

STEP(L^l) = 0. 

STFP(L+2> = 0. 

ADHFS IVE IS NOT LEADED I N T n PLASTIC 70NF TN L A TF D STEPS OF 
l R Y P A* S SUCH COMPUTATION* AND TO PFRFFC TL Y-FL AST? 

VP = GAMMA(L) 

IF ( ( V8 • L r . GAMMAF) .A^'D. ( V 8 .GE. C7) ) f,0 TO 510 

XP = LOOOOOOOOOO. 

MFLAG = 0 

FDR MAXIM«JM PO<;c;iri_c cyjcNT QF 
AND COMPARE WITH STEP LENGTH 


SHEAR STRFNGT 


* fta 


IF 


SOLVE 

1 


AT THIS POTN t 


AND. (0.999990909 .(T. R) ) GO to 670 


STRENGTH 


JOTNT . 

C S0LUT1 


PLASTIC ADHESIVE ZONF 


V4 = ftotp(N) 

V5 = C T T N° ( N ) 

V 6 = T 0U T c R ( L ) 

V7 = TiNNFR(L) 

VP = STed(L) 

V = (1. / V4 + 

A = TAUMAX * V 
C IE BONDED ON ONF SIDE 
B = ( C 5 * SGNLD - 

C NOT f that q should BE 
C 
C 


1. / V 5 ) / FTA 


QE JOINT PNJL Yt DIVIDE A RY 7, 

V 6 / V 4 +• V 7 / V 5 ) / eta 

NEGATIVE AT AND NEAR more CRITICAL C N 0 n 
IF NOT, SOLUTION IS PROCEFnTNG c rqm WRONG END OF JOINT 
HENCF NEED fop PRIOR PLASTIC SOLU T I n N TT T OFNT f F Y CPTTjrAI FND 


IF ( V8 .LT. 0. ) GO TO 460 
procedure for positive PLAS t IC 
IF ( R ,r,F. o. ) GO t ° 470 


ADHESIVE shfap STRAINS 


A4EG4410 
A4EG4420 
A4EG4430 
A4E G4440 
A4EG4450 
A4EG4460 
A4EG4470 
A4FG4480 
A4EG4490 
A4EG4500 
A4EG4510 
A4EG4520 
A4EG4530 
A 4 c G4540 
A 4 c G 4550 
A4EG4560 
A4EG4570 
A4PG4580 
A4F G4590 
A4EG4600 
A4EG4610 
A4EG4620 
A 4FG4630 
A4FG4640 
HA4EG4650 
A4FG4660 
A 4E G4670 
A4EG4680 
A4EG4690 
A 4EG4700 
A4EG47 10 
A4E G4 720 
A4E G4730 
A4EG4740 
A4EG4750 
A4EG4760 
S A 4E G4 7 7 0 
A4EG4780 
A 4E G4 790 
A4EG4800 
A4EG4810 
A 4 C G48 20 
A4FG4830 
A4E G4840 
A4 C G4950 
A4FG4860 
A4E G48 T 0 
A 4 C G48 80 
A4^G4R90 
A 4 F G4900 
A4EG4910 
A4EQ4920 
A 4 C G49 30 
A4 C G4940 
A4E G4 950 
A 4 r G4960 
A4FG4970 
A4EG4980 
A4CG4990 
A4FG5000 
A4EG5010 
A4EG5020 
A4EG5 030 
&4EG5040 
A4EG5050 
A4FG5060 
I A4EG5070 
A4 C G5080 
A4 C G5090 
A4EG5100 
A4EG5110 

A4EG5l?o 

A4EG5130 
A4EG5140 
A4EG5150 
A4EG5160 
A 4 C G5 1 70 
A4EG51 80 
A4 C G5 l 90 
A4EG5200 
A4EG5210 
A4EG5220 
F JOINT A4FG5230 
A4FG5240 
A4 C G52 50 
A4EG5260 
44EG5270 
A4FG5 2 80 
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on (inn rvnono 


C IF 


ryiz JOIN" 


f = VR - MAMMAE 
n = B**2 - 4* * A * C 

i f (n a T . p.) no to 479 ^ rLn 

S n . D L A S T T C 70WF TS UNROUNDED, A S AT PAP 
XP = t-l. * 8 - OSO«T(D)l / (2. * M 
r,n t o 470 

PPRC p ntJPF POP NFGATTVE PLASTIC ADHESIVE SHFAP S TQ ATMS 

460 IF ( R • L E, 0.) RR Tn 470 
C = VR ♦ mammae 
n = q**2 + 4, * A * C 
I p (O ,LT # 0.) 0° T n 470 

PlASTir ZDNF IS UNBOUMOF", AS AT FAR FND D* JOINT 
= ( B - PS0 D T( 0 n / { 2. * a I 

(XP . G p • VO) GO TO 4R0 

ADHFSIVF T S PfJl LY-c>! *S T IC THROUGHOUT that STF p 
NCV^ f PR F AK U° ST cn INTO PL A c T f C AND ELASTIC PORTIONS 
MFLAG = I 
STFP(t ) = XP 
STFP(l+l) = VO - XP 
V9 s X p 

MAY HAVF TO DECPFASF STEP(3*M-1) AND ADD TO STFP(3*N) LATrp 

PROCEDURE F0» F> JLL Y- P L A S T T C STFP OR STFP PORTION 

THIS SFPIFS OF EQUATIONS HOLDS REGARDLESS OF SION OF SHF AR STRESS 
l GRADIENT AT START OF STFP 

THf USF OF TAIJ(L) INSTEAD of tauMAX COVERS RFVFPSAL OF SIGN 


C IF 


so, 

XP 
470 IF 
T p SO, 
IF 


FOP 

ONE 


FACTOR 2. ACCOUNTS 
1 IF BONDED on 
L * L ♦ 1 
T OUT c R ( L ) = V6 

TINNFP(L) = V7 
GAMMA(L) = GAMMA(L-l) 
TAU(L) = TAUIL-I) 


ponding ON 
SIDE ONLY, 


both SIDES nc 
REDUCE to 1. 


I NN FR ADHERFND. 


DEI. T 
DEL T 


♦ P * V9 ♦ TAU(L-l) * V * < yq*%2 ) 


DEL T AO ( L ) 
l <V9**2) 
OELTAKL) 
1 IV9**2> 

NOTE THAT USE 
l SIGN DF 
IF (MFLAG 
C IF NOT, STEP 


LI * l ♦ 1 
L 2 * t ♦ 2 
TOUTER(LI) 
TOUTED ( L 2 ) 
TIMNER(Ll) 
T INNFP ( L 2 ) 
TAIMLI ) 
TAU(L2) 


DEL T AO( L-i ) ♦ C3 * V9 ♦ SGNLD * ( V6 * V9 - T AU ( L ) * 

/ ? \ / V4 

= DGLTMIL-1) ♦ C4 * V9 ♦ SGNLO * <V7 * V9 ♦ TAIMLI * 

/ 2 ) / V5 

OP T AIM L I INSTEAD OP TAUMAX AUTOMATICALLY ACCOUNTS FOR 
ADHESIVE SHEAR STRESS 
.EQ. 1> GO TO 690 
IS PLASTIC THROUGHOUT 


- rnu T PP(L» 
= TOIITcoiLI 

- T INN EP ( L I 
= TINNPPJLI 

= TAum 

= TAIMLI 


GAMMA! LI I = GAMMA(L) 
GAMMA! L2 I ■ = G A MM A ( L I 
OELTAOttll = DEL T AO ( L I 


690 


DFITAO! L2I 
OELTAKLl) 
DELTA I !L2) 

IF IN .EO. 

IF ! T 0IJ T ER I L I 
IF 1 TINNER I L I 


OELTADI 1. 1 
= OEL T A!(LI 
= DELT A I ! L I 
NSTEPSl GO TO 500 
.LT. VIO) GO TO 
.LT. VIO) G n TO 


620 

610 


C 

c 

c 

c 

c 


AT NEAP END OF JOINT 


NOTE THAT TH C SP CONVERGENCE CHFCKS ARE CRITICAL 
500 IF (MFLAG .EO. 1) GO TO 510 
GO to 590 

I5rNT^? , '»H?5H?I l, !? C r: i I; F )L‘S?}^^fIsTIC FULLY YL.STIC THMU-.HnuT 
510 K=l-3*N + 2 

K • EO* 0 CORRESPONDS TO NO °LA$TIC ZONE 
SET INITIAL CONDITIONS AT START OF STEP 
V4 = FJOTR(N) 

V5 = E T INR ( N) 

V6 = TOUTER(L) 

V7 * TINNFR(L) , , t 

ALAMO A = DSORT ( C 2 * (1. / V4 ♦ 1. / V5)> 

LFLAG » 0 

COMPUTE VALUES AT FAR f^D OF ELASTIC ZONE 
A a TAU(L) 


B * ( V7 / V5 - V6 / V4 ♦ C5 * 
NOTE THAT SGNLD SIGNIFIES WHETHER 
C * STEPCLI 


SGNLD) * Ci / 
SHEAR LOAD IS 


ALAMDA 

TFNSILF 


OR COMPRFSSI 


C IF 


D * ALAMDA * , 

E a DSINH(O) 

F * OCOSH(D) 
TAUIL+1) a A * 

IF ( (TAUCL+l) 

1 GO TO 540 
NOT, ELASTIC STEP 
ELMAX = C 
FLMIN = 0. 


F + B 
.LE. 


* c 

TAMMAX) 


, AND* ( T AU ( L+ 1 ) .GE. CIO) ) 
SIZE IS EXCESSIVE* PEOUCE BY I TEP ATI ON 


A4EG5290 
A4 r G5 300 
A 4 P G53 1 0 
A4 E GS320 
A4FG5330 
A4 C G5?40 
A4EG5350 
A 4 C G5 360 
A 4E G53 70 
A4EG5380 
A4 EG53 90 
A4 C G5400 
A4EG5410 
A4FG542D 
A 4 C G5430 
A4EG5440 
A4EG5450 
A4EG5460 
A4EG5470 
A4 C 05480 
A 4E G 5490 
A4EG5500 
A4FG55I0 
A4EG5520 
A4EG5530 
A4EG5540 
A4FG5550 
A 4 C GS 560 
&4EG5570 
A4EG5530 
A 4E 05590 
A4EG5600 
&4 C G56 1 0 
A4E05620 
A4EG5630 
A4EG5640 
A4EG5650 
A4EG5660 
A4FG5670 
A4EG5680 
A4FG5690 
A4EG5700 
A4EG5710 
A4E05720 
A4EG5730 
A4E05740 
A4E05750 
A4EG5760 
A4EG5770 
A 4 C G5780 
A4FGS790 
A4EG5800 
A4 C G58 10 
A4EG5820 
A4FG5330 
A4EG5840 
A4 c GS350 
A4 C G5860 
A4FG5870 
A4EG5880 
A4EG5390 
A4EG5900 
A4EG5910 
A4 c G5920 
A4EG5930 
A4EG5940 
A4EG5950 
A4EG5960 
A4FG5970 
A4EG5980 
A4EG5990 
A4EG6000 
A4EG60 10 
A4EG6020 
A4EG6030 
A4FG6040 
A4EG6050 
V E A4EG6060 
A4EG6070 
A4EG6080 
A4EG6090 
A4EG6100 
A4EG6110 
A4EG6L20 
A4EG6130 
A4FG6140 
A4EG6150 
A4EG6160 


no 


onn non oc »o o n oo o o no oo 


f)n 520 I COU*' T ■' 1 , 100 

PI = (PI max + FI MIN) / 
n = ALAMOS, * PI 

P = nc I m H( D ) 

p = nrnsH(o) 


2. 


500 


T C H C C K = A * p + 

B * p 


IF 

( ( tc MFC ^ .r.T. 

T A 1 1 M A Y ) 

.no. 

T F 

( (TTH^fK .LT. 

T A 1 1 M A X ) 

. AND 

0 

= c L K ' ! M / 



! c 

( ( 1 . 00000000 l 

.GT. o) 

. AND 

CONTTNMF 



S T 

FP( U = F L 



S T p P ( l +1) = STPP(L^l) + C 

- FL 


(TCHFric CIO) > ELMAX = F L 

(TCMFCK .GT. C10I ) FLMTN = El 

, ( 0 *999909999 .LT. R| ) 00 T 0 530 


(p - i. n 

BOTH S I^F S OF 


INNFR A0HPPFN0. 


I A * (F - 1. ) ♦ B 


I c - n) ) 


l C L A0 = 1 

IP (TPHECK • GT • 0.) T A IJ I L * 1 1 = T A'fMAX 

T F (TCMCfK . L T . 0.) T/njfl+i) = rio 

5<V0 DEL T = 12. f A l A m 0 A ) * < A * F ♦ Q * 
factor 2 . accounts bonding on 

l |p bhndpd nv o»ip sjof n\M Y , P c DU r F tp 

l = i ♦ i 

T OUTER (L) = V6 - 0E l T 
T I NNP D I 1 ) = V/ 7 + HFl.T 

OFLOtT = (2. / l ALAMOA**?) I * . 

ciirTPC OF 2 . &r r 0l»MTP POP BONDING ON BOTH SIDES op T w N F 0 A0HPRFNO. 
I IF PONDED ON °nf $ T 0 c ONLY, PFDUCF TO 1. 

OFLTAP(L) = 0 c t TAO(l -n ♦ 03 + El ♦ SON LD * ( V6 * FL - D F L 0 L T 1 

nC L T A I ( L ) = n-LTAKL-l) + r 4 * PL + SOMin * ( V7 * H f OELOlTJ 

GA V MA { l ) = TA!)U ) / G 

I F (LFLAG .FQ. 1) GO tp 550 

IF NOT, THFRP NO (SFCDNn) PLASTIC 70NP AT FAP PNO °F STFP 
LI = l + l 

rnijTFP til) = t OMT c f(L> 

T I NNF P ( L l > = T!NN c R(L) 

TAU (111 = T At f( L ) 

&AMMMLU = GAMMAIL) 

DFL T An(Ll) = DELTAnn.) 

OFL T A T (11) = n F l T A T (| ) 

TP IK . FQ. 1) On Tp 550 

TP NOT, t H psf w as isp ( P I P S T I ° L A S T I C 70 MP AT NFAR FWD OF JOINT 
L 2 = L + 2 

TflljTFP (12) = TOUT*® ( L > 

T INNER U 2) = MNN C P(L) 

T AN ( L 2 ) = THIKH 

G A m m A ( L 2 ) = G A M m a ( L ) 

OFL T AO ( ! 2) = OFLT A0( l ) 

0 E L T A I ( L 2 ) = OFITAUL) 

550 IF (N . PQ • N ST P ° S ) GO TO 560 

TF (TplJTFRd) .IT. VIO) 0,n TO 620 
TF (TfNNFR(L) .IT. VIO) GO TQ 610 
NOT p that THFSf CONVERGENCE GHFCKS ARE CRITICAL 
ip VIO IS FITHFP thh LAPGF OP TOO SMALL, CONVERGENT. F FAILS 
560 IF (LFLAG .EO. 1) GO 570 
GO TO 500 


ADHFPFND. 


PROCEDURE FOR (SECOND) PLASTIC 7 ONE AT FAR FNO OF STFP 
570 VO = STPP(L) 

DEI T = 2. * tauM ) * V 9 

FACTOR 2. AOCniJN T S pop BONDING ON BOTH SIDES OF TNNFR 
l IF BONDED ON SIDE ONLY, REDUCE To \ m 

SET INITIAL CONDITIONS AT S t Adt OF STFP 
V4 = FTOTR IN) 

V5 - PTINP(N) 

V 6 = TOUTPP(L) 

V7 = TTNNFR(L) 

L = L + l 

TOUTFP(L) = V6 - DFLT 
TINMEP(L) = V7 * DELT 

A = (TAU(L-l) / FT A I * I1./V4 -»■ 1./V5) 

NOT F TH F USF OF TAH(L-l) INSTEAD OF taijmAX TN ORD^R TO ACCOUNT 
1 AUTDMATI CALI Y p^R thp SIGN OF TMF SHEAR STRESS 
IF BONDED ON ONP SIDE OF JOINT ONLY, DIVIDE A BY 2. 

B = { C 5 * SGNl 0 - V6 / V4 + V7 / V5) t ETA 
GAMMA ( L ) = GAMMA ( L“ l ) ♦ B * V9 + A * (V9^*2) 

TAMIL) = TAU(L-l) 

DEL T AO ( L ) = DELTAO(L-l) 

1 (V9**2) f 2. > / V4 

D c LTAT(L) = DFlTATfL-n 
1 ( V9**2> / 2, ) / VS 

IF THEPE has RFFN MO PLASTIC 7 n NF at START OF STFD f TRANSFEP VALUES 
1 JUST COMPUTFD ACROSS TO LAST SUBDIVISION IN STEP 
THIS IS NFCFSSAPY tr PPOVIDF INPUT DATA FOR START OF NEXT STEP 
IF IK .FO* 1 ) GO to 580 
LI = L + 1 

T OUTER (LI) = T 0U T p R < L ) 

TINNFR(Ll) = TTNNpb<L) 

T AU ( L 1 ) = TA'J(L) 

GA m ma ( LI ) = GAMMA(L) 

DFLTAD(Ll) = OFLTAOfLI 


> T3 * V9 ♦ SGNLD * I V6 ★ V9 - TAMIL) * 
+ CA * V9 ♦ SGNLD * I V7 * V9 ♦ TAMIL) * 


A4 C G6 1 70 
A4PG6180 
A4EG6190 
A4FG620 0 
A4EG6210 
A4FG6220 
A4FG6230 
A4EG6240 
A4 C G 62 50 
A4EG6260 
A4EG6270 
A4FG6280 
A4FG62 90 
A4PG6300 
A4EG6310 
A4EG6320 
A4EG6330 
A4PG6340 
A4EG6350 
A4FG6360 
A4PG6370 
A4EG6380 
A4EG6390 
A4EG6400 
A4FG6410 
/ V4 ^ 4 C G6420 
/ V5 A 4EG6430 
A4EG6440 
A4EG6450 
A4 C G6460 
A4EG6470 
A4EG6480 
A4EG6490 
A 4FG65 00 
A4EG6510 
A4FG6520 
A4FG6530 
A4FG6540 
A4EG6550 
A 4FG6560 
A 4E G65 7 0 
A4EG6580 
A4FG6590 
A4FG6600 
A4FG6610 
A4EG6620 
A4EG6630 
A4FG6640 
A4FG6650 
A4FG6660 
A4FG6670 
A4EG6680 
A4FG6690 
A4FG6700 
A4PG6710 
A4EG6720 
A4EG6730 
A 4F G6 740 
A4FG6750 
A4EG6760 
A4EG6770 
A4EG6780 
A4EG6790 
A4EG6900 
A4FG68 10 
A4 c G68 20 
A4FG6830 
A4EG6840 
A4EG6950 
A4EG6860 
A4PG6870 
A4PG6880 
A4EG6890 
A4EG6900 
A4EG6910 
A4FG6920 
A4 C G6930 
A 4EG6940 
A4FG6950 
A4FG6960 
A4EG6970 
A4FG6980 
A4EG6990 
A 4FG7000 
A4EG70 10 
A4FG7020 
A 4 FG7030 
A4EG7040 


m 



DELTAI(Ll) = OEL T AT(L > 

500 IP ( N . C Q. NSTF^S) r,n to 630 

TP (TOU T ER(L) .LT. VIO) on Tp 620 
IF ( T TNNFR < L ) • L T • VIO) 00 Tn 610 
NOT p THAT THFS c CONVERGENCE CHECKS ARP 
590 IF IN .FO. NSTF p S> On TO 630 

600 continue 

PROCFDURE POP WHEN LOAD P ST I MATF 
610 TMAX = TOUTcp ( ji ) 

SCHECK = TnUTFP(Jl) 

T n UTFP f Jl ) = (TMAX 4* TMIN) / 

GO TQ 660 

PROCFnUPF C 0P WHEN LOAD ESTIMATE 
620 T MI N = TOUT PR ( JI > 

SCHECK = T OUT PR ( J 1 ) 

TnjTEP(Jl) = (TMAX ♦ TMIN) / 

GO TO 660 


CPTTICAI 


TS TOO HIGH 


2 . 

IS 

2 . 


TOO LOW 


OP N0 T 


CHECK WHFTHFP OR mot dp Pf [ $EL Y 100 PERCENT OF LHAO HAS TRANSFERRED 
630 R 1 = TOUTFP(l) / TINNER(MCHFCK) 

P2 = TCHECK / TINNEP(MCHECK) 

IF ( (I. 000001 .GT. PI) .AND. (0.999999 .L T . Rl) .ANO. 

1 (l.OOOOOl .GT. D 2 ) .AND. (0.999999 .LT. R2) ) GO 7 0 710 

IF ( TOIJTE 0 ( l > .LT. TINN C R( MCH^CK) ) GO TO 640 
NOTE THAT t HER F t LOAD IS T AK C N TO RE POSITIVE WHETHER TENSILE 

1 cpo ft MFGATIV^ LOAD, d p p c e n I NG INSTRUCTION SHOULD 8F 

2 INTFRCHANGEO WITH the FOLLOWING ONF 
IF $0, LOAD ESTIMATE (S TOO LOW 
IF RfVFRSF HOI OS , LOAD ESTIMATE IS TOO HIGH 

GO to 650 

PROCEDURE FOR WHEW LOAD ESTIMATE ts t 00 LOW 
640 T MIN = TniJTt=P(Jl) 

TOUTER(Ji) = (TMAX + TMIN) / 2. 

TCHECK = T INNER! MCHECK ) 

GO TO 660 

PROC c O(JRE FOP WHEN LOAD FS T IMATE IS TOO HTGH 
650 TMAX = TOl)TFR(Jl) 

TPUTEPUll = (TMAX * TMTN) / 2. 

TCHECK = TINNER MCH^CK ) 

660 CONTINUF 

CONVERGENCE WTLL NOT opoCEED TO FftR 

1 8 C C A US E OF NUMERICAL ACCURACY 

2 EARLIER VALUES t WHICH HAVE C ON V p RG p D 1 

3 INTFRMEDTATP VALUES, AND TO C H F r « FOP 
TMAX = TUPPPR 
TMIN = -1. * TMAX 
GO TO 700 

670 IF ( TOUTEP f J 2 1 .GT. 0.) GO TP 680 
IE ( T OUTER ( J 2 ) .L T . 0.) GO tq 6^0 
TMAX = T 0U T E R ( 1) / 10. 


END OF JOINT TN SINGLF PASS 
PROBLEMS. REMEDY IS T 0 FR EE7 E 
AND TO PFdtURR SLIGHTLY 
CONVERGENCE AT THE EAR 


680 


690 


C 

c 

c 

c 

c 


TMIN = -1. 
GO TO 700 
TMAX = 1.1 

TMIN = 0.9 
GO TO 700 
TMAX = 0.9 
TMIN = l.l 


* TMAX 

TOijTER( J2) 
T nu TC R ( J 2 ) 


THE SOUNDS ABOV r 
THEY MIJC T RF 
700 CONTINUF 


* T OUT EP ( J 2 ) 

★ T nu Ttr P ( j 2 ) 
ARE CRITICAL 


TN fnSUPTNG CONVERGENCE 


NEITHER top L ftp GE NOR TOO S m ALL 


INTERNAL L n A 0 S are CRITICAL FOR EL ASTIC-P) ASTIC 


C AT 


ASCERTAIN whether 
l AOHFMVE 

710 RFCAIF = TOUTFR(l) / S T R GTP fit 
IE (RSCALF • L r . 0.) RSCAL c = -l. 
PGAMAX = GAMMA(l) / GAMMAX 
IE <PGA«AX . L T • 0.) R G A M A X = -1. 

OP 730 N = 2 » MCHFCK 
P I NR = TINNER(N) / STRGNR(M-i) 

EAOh STFP t RANS! t TON neeo THE THTNMEP 
IF (RINR • L T • 0. > R INR - - l. 

IF (RTNR .GT. R S C AL p ) RSCALF 
IF (N . C Q. MCHFCK ) GO Tn 720 
PPTR = TOUT ER ( N ) / S T RG T R( M ) 

IF (ROTP .LT. D.) R ° TP = -1. 

IF (ROTR .GT. RSCALF) RSCALF 
RGAMX = GA MM M N ) / G A M m ft y 
IF (RGAMX .LT. 0.) RGAMX = -1. 

T c (RGAMX .GT. PGAMAX) RGAMAX = 
CONTINUF 


* PSCALF 

* PGAMAX 


720 


PTMO 

RINR 


Roto 

ROTR 


SFCTION. HFN r E THF (N-l) 


730 


* RGAMX 
RGAMX 


A4FG7050 
A 4 C G7060 
A4EG7070 
A4EG70R0 
A4FG7090 
A4 r G7 100 
A4F G 7110 
A4EG7120 
A4 C G7130 
A4E G7 1 40 
A4FG7150 
A4FG7160 
A4 C G7 1 7 0 
A 4 F G 7 1 0 0 
A4FG7190 
A4FG7200 
A4FG72 10 
A4EG7220 
A4FG7230 
A4FG7240 
A4FG7250 
A4EG7260 
A4EG7270 
A 4FG72 80 
A4EG7290 
A 4EG7300 
A4 C G7 310 
A4 C G7 3 20 
A4FG7330 
A4FG7340 
A4FG7350 
A 4 C G73 60 
A4EG7370 
A4EG7380 
A4FG7390 
A4FG7400 
A4FG7410 
A4FG7420 
A4FG7430 
A4FG7440 
A4FG7450 
A4EG7460 
A4FG7470 
ENOA4EG7480 
A4 C G7490 
A4EG75D0 
A4EG75 10 
A4EG7520 
A4EG7530 
A4EG7540 
A4EG7550 
A4EG7560 
A4EG7S70 
A 4 C G75 80 
A4FG7590 
A 4 C G 7600 
A4EG7610 
A4FG7620 
A4EG763D 
A4 p G7640 
A4FG7650 
A4EG7660 
A4EG7670 
A 4 C G7680 
A4FG7690 
A 4E G7700 
A4FQ7710 
A4EG7720 
A4 C G7730 
A4 C G7740 
A 4EG7750 
A4EG7760 
A4FG7 770 
A4EG7780 
A4 C G7790 
A 4 C G7800 
A4EG7810 
A4EG7820 
A 4 E G 7 9 3 0 
A4EG7840 


A4E G 7 8 50 

TF UPP«=R AND LOWFR 80UNOS ON JOINT LOAD HAVE COAL c SCED, A4EG7860 

l NO morc CONV F R G C NC P TS P°SS I BLE • PRINT 0(JT RESULTS. A4EG7870 

R = TUPPER / TLPW C R A4 c G7880 

IF ( (l. 000000001 .GT. R) .ANO. (0. 909999990 .LT. P) ) GO TO 770 A4EG7390 

ADJUST MAXIMUM ADHESIVE SHEAR STRAIN IF ADHFR FND STRENGTH GOVERNS OVERA4FG7900 
1 A OWES T V c STR FNGTH CONSIDERATIONS A4 C G7910 

IF ( (RSCALF . G T . 1.0001) .OR. (PGAMAX .GT. 1,0001) ) A4FG7920 
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r 

r 


r 


1 GO to 74 9 

T c f ( PSFAL C . L T . 0*9999) . A N 9 * < P GAMAX 
1 GO to 750 

IF MPITHPP HF TH C S F CH c g K S I G MpT f SOLUTION 

tin rn 770 

IF NOT, DFTTFQ'NTC 

749 G A mijpp = GAVmm l > 

TUP°FP = T'VJTPPf 1 » 

JCHF^k = 2 

GO to 760 

759 G AML WP = ( 1 ) 

Tt OWE 3 = T9U TC P ( I ) 

JfM F r K = 1 

769 CPMTTNIJF 

IF PROGRAM GO c S °AST THIS CONTTNHF ^T^ t fmfNT 
WP T T c (6,320) 


A4E G7930 

.IT. 0.9999) ) A4 C G7940 

A 4 C G79 50 

HAS CONVFPGPO. PRIN T niJT. A4 C G7969 

A4E07970 
A4 r G79S0 
A4 -G7990 
A4 C G8000 
A4EGR0I0 
A4 C GR020 
A4FG9030 
A4E98040 
A4 C G8050 
A4 C GB960 

, rnMvcor,FWCF HAS FAILED A4 C G8079 

A4 C GB 089 


P R T N T OUT o^SULTS OR FI AST T C - ° L A S T T r r rjMPtlT A I ON* 

770 WPTTF (6,780) Tnu T E 0 (l)t GAM*AX, S 0 N L P , np L TMD 
780 FOPMat ( 1H l / , 5 ( 1 HO / ) , 

1 47H c| ACTir-PLASTTO jntN^ S T ° FNGTH , PLPAO (L^S) = , -10. L/, 

2 43H ALLOW A 01 F AHmfsIV c SMFAP STRAIN, GAMMAX = . P6.3/, 

3 1H , 3HSGNID * , ^4.1, 54H SGML D = 4-1 Fno t r N S T L c SHFAR A NO 


A4f=G8090 
A4EG8109 
A 4 E G 8 L 10 
A4FG8120 
A 4 C G 8130 
A4FGB140 
l A4EG8L50 


c 6 • 1/ / A4 c 08 160 


4 FOP CPM D PESST V p /, 36H TCMpppAyijpc 0 I FF c P c MT T & L ( OF 0 c ) = 

5, IH , 5X, 1HN, 2 X , 5HSTFPL, IX, 6HTHICK0, ix, 6HTHT CK T * 3*, A4EG8170 

6 3H T A U , 4 X , SHGAMMA, IX, 6HH FL T AG, ix, 6HGFLTAT, 5X, 6H tOUTT Q , A4 C G8183 

7 5 X , 6HSTPOT0, 5x f 6H T ! NMFP , 5X, 6HSTP INP / / ) A4FGR190 

On R 00 M = 1, MPH^rx A4FGB200 

W P I T F (6,790) N, STF°(N), THCKNO(N), THCKNHNIt TAU(N), GAMMA!*!), A4EG8210 

1 9 F L T A 0 ( M ) , OFL T A!(M), TmjTcp(W| f STRvGTP(N), T j aj N c q ( m ) , S T © GN* ( N A 4FG R 2 70 

2) A4PGR230 

4X , T2t IX, F 6 * 4 , IV, F 6 . 4 , IX, r 6.4, IX, P7. I , IX 


790 f np y a T ( 1H 

1 >=6.3, ix 

2 ^10.1) 

800 CONTINUE 

IF (XAOHSV .FO 
IF (DCCAL c • L T 


F6.4, IX, P6.4, IX, FlO.l, IX, c 1 0* l , IX, F10.lt IX, 


II GO S2 0 

GAM A X ) GO Tp 82 0 
C I c NOT, r n M P 1 1 T tr pnTc:\|TjAL RONO ST P C NGT H np AOH FS T V r 
KAOHSV = 1 

np Rio K = 1 , m s T r ° S 

STPOTR(K) = 1000000000000000000009. 

810 STRINR(K) = 1000090000000000000990. 

GO th 79 
8?0 CPNTINUF 
STOP 


A4 p G8240 
A4FG8250 
A4 C G8 260 
A4 C G8270 
A4EG8280 
A4 P G8290 
A4 C G 8 3 09 
A4 E G 8 3 1 0 
A 4E 98320 
A4FG8330 
A4 C G8340 
A4EG8350 
A4 EG 83 60 
A4 C GQ370 


rvn 


A4GGR3R0 
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INPUT DATA 

AtPHAO « 0*0000050 IPER DEG. FI 


N STFPL THICKO THICK! 


ALPHA! • 0*0 IPER DEG. FI 

STROTR STR1NR ETOTR ET1NR 


OELTMP * -280. C I OEG. FI 


0 • 7500 0.2500 0.0440 325CC.0 3036.0 400000C.C 

0.7500 0.2 r 60 0.0800 267RC.0 6072. 0 32960CC.0 

0.7500 0 • l 620 0.132C 2K6C.C t?}??*? 

0.750''' 0.1 180 0.1760 1534C.C 12144.0 1880CCC.O 

0.3750 0.0740 0.22HC 9620.0 !51?2*2 

0.3750 0.0300 0.2643 39CC.C 48 °2*n 

****** 0.0 0.2640 0.0 18216.0 0.0 


352C00.3 
704CC0.C 
1056000. C 
1408COC.C 
17600C0.0 
2U200C.C 
2112C0C.C 


6C00.0 


ELASTIC JOINT STRENGTH* PLOAD UBS) * 10730.1 

AtLOW^E *gH F . S irF^ E )Ma! S |A E IS U Ja5 -l^FO Q *COMPRESSIVE 
TEMPERATURE DIFFERENTIAL IDEG F) * -28C.0 

N STEPL THICKO THICK! TAU 


0.7500 0.2500 0.0440 5696.0 
0.75CO 0.2060 0.0980 2568.5 
0.7500 0.1620 0.1320 2243.7 
0. 7500 0.1100 0.1760 2239. C 
0 • 3750 0.0740 0.2200 2797.8 
0.3750 0.0300 0.2640 37 22.2 
****** 0.0 0.2640 6C00.G 


GAMMA 

DELTAO 

DELTAI 

TOUTER 

STROTR 

0.095 

0.0 

-.0005 

10730.1 

325CC.0 

0.C43 

-.0028 

-.0030 

8817.0 

2 6 7 8 C .0 

0.037 

-.0057 

-.0059 

7344.6 

2 106C .0 

0.037 

- . OC 87 

-.0089 

5804.3 

1534C .0 

0.C47 

-.0117 

-.0119 

4018.4 

9620.0 

°.C6 2 

-.0132 

-.0135 

2232.4 

3900.0 

0. 100 

-.0147 

-.0152 

-C.0 

0.0 


TINNER 


0.0 

1913.1 

3385.5 

4925.8 

6711.8 

8497.8 
10730.1 


STRI NR 


3036. 

6C72. 

9108. 

12144. 

15180. 

18216. 

18216. 


input oata 
ALPHAO * 0.0 


(PER DEG. FI ALPHAI * 0.CC00050 I PER DEG. FI DELTMP * -280. C tOEG. FI 


N STEPL THICKO THICK! 


STROTR 


STRINR 


ETOTR 


ETINR 


0.3750 0.2640 O.03C0 1821£*0 
0.3750 0.2200 0.0740 15180.0 
0.7500 0.1760 O.llftC 12144.0 
0.7500 0 . I 320 0.1620 91OR.0 
0.7500 0.0880 0.2C60 6C72.° 
0.75°'' 0.0440 0 . 2 *>C0 3C36.0 
****** O.C 0.250C 0.0 


3900. C 
°620 « 0 

15340.0 
2106°. 0 

26780.0 

32500.0 
32500.0 


2112000 . 
1 760000 . 
1408000. 
1056CC0 . 
704000. 
352000. 
0. 


480000. C 
1184COO.O 
1800CCO.C 
2592000. C 
3296000. C 
400000C.C 
400000C.C 


ELASTIC JOINT STRENGTH, PLOAD UBSI * 10730.1 , 

ALLOWABLE AOHFSIV c SHEAR STRESS, TAUMAX (PSII 3 6000.0 

ALLOWABLE TEN$lLF SHEAR ANn .j f OR COMPRESSIVE 

TEMPERATURE DIFFERENTIAL IDEG FI » -28C.C 

- N STEPL THICKO THICKI TA'J GAMMA CELT AO DELTAI TOUTER STROTR 


1 0.3750 0.2640 0.030C 6C00.0 

2 0 1 3750 0.2200 0.0740 3722.2 

3 0.7500 0.1760 0.1180 27 97.8 

4 0.7500 0.1320 0.1620 2239.0 

5 0. 7500 0*080° 0.2060 2243.7 

6 0.7500 0.0440 0.2500 2568.5 

7 ****** o.O 0.2500 5696.1 


Q.1CC 0.0 -.0005 10730.1 
0.062 -.0017 -.0020 8497.8 
0.C47 -.0033 -.0035 6711.8 
C.037 - • CC 64 - * CC 66 4925.9 
C.037 - . OC 9 3 - • CO 95 3385.5 
0.043 -.0122 -.0124 1*13.1 
0.C95 -.0147 -.0152 -0.0 


19216.0 

15180.0 

12144.0 
9109 .0 
6C72.0 
3036.0 

0.0 


TINNER 


0.0 

2232.4 

4018.4 
5804. 3 
7344.6 
881 7.0 

10730.1 


STRINR 


3900 .0 
962C .0 

15340.0 

2 106C .0 
26790 .0 

32500.0 

3 25 DC .0 


ELASTIC-PLASTIC JOINT STRENGTH, PLOAD (LBSI • 16996.6 

ALLOWABLE ADHESIVE SHEAR STRAIN, GAMMAX * 1 

N * -1.0 N * *1 FOR TFNSILE SHEAR ANO -1 FOR COMPRESSIVE 
TEMPERATURE DIFFERENTIAL IDEG F) * -280. C 


N 

STEPL 

"THICKO 

1 

0.1238 

0.2640 

2 

0.2357 

C . 2640 

3 

0.0155 

0.2640 

4 

0 .C 185 

0.2200 

5 

0.3565 

0.2200 

6 

0.0 

0.2200 


0.7500 
0.0 
O.C 

0.75°0 
0.0 
0.0 

r _ C • 7500 

U 0.0 

15 0.0 

16 0.7135 
‘7 5*0365 
_B 6.0 

19 0.0 


J3 


0.1760 

5.1760 

0.1760 

0.1320 

0.1320 

0.1320 

0.0880 

0.0880 

0.0880 

0.044C 

0.0440 

6.0440 

0.0 


THICKI 

TAU 

GAMMA 

OELTAO 

OELTAI 

TOUTER 

STROTR 

TINNER 

0 .0 3C0 

6000.0 

0.218 

0.0 

-.0011 

16996.6 

18216.0 

C.O 

0.0300 

6000 .C 

0. ICO 

-.0010 

-.0014 

15510.9 

19216.0 

1405.7 

0.0300 

6000 .0 

0. IOC 

-.0026 

-.0030 

13282.4 

18216.0 

3714,2 

° • 074C 

60CC.0 

0.110 

- • QC2 7 

-.0031 

1 3°96 « 3 

15130. C 

3900 . 3 

5.074" 

6000 .C 

0. 100 

-.0028 

-.0032 

12874.5 

15100 .0 

4122. 1 

0.0740 

4616.9 

n.077 

-.0077 

-.0071 

IC040.8 

1518C .0 

6955.3 

0.1180 

4616.9 

0.077 

- • C 07 7 

-.0071 

10C4Q.8 

12144.0 

6955.9 

D. 1 1 8C 

3483. C 

0.058 

-.0120 

-.01 14 

7168.7 

12144.0 

9827, ° 

5,1100 

3483.0 

0.058 

-.0120 

-.0114 

7168.7 

12144.0 

9027.9 

0.1620 

3483. C 

0.C58 

-.0120 

-.0114 

7168.7 

9108. 0 

9827.9 

0. 1620 

3340.8 

0.C56 

-.0160 

-.0154 

4824.1 

91C8.0 

1 2 1 7 2 . 6 

0. 162C 

3340.8 

C.056 

-.0160 

-.0154 

4824.1 

9108. 0 

1217 2.6 

C. 206C 

3340 . 8 

0.056 

-.0160 

-.0154 

4824,1 

5072.0 

1217 2.6 

0.206° 

3679.3 

0.061 

-.0198 

-.0193 

2676.1 

6 C 72*0 

14320.5 

0.2060 

3679.3 

0.061 

-.0190 

-.0193 

2676.1 

6 C 7 2 * 0 

14220.6 

0.7500 

3679.3 

0.061 

-.0198 

-.0193 

2676.1 

3036.0 

14320.6 

0.25CC 

6CC0.C 

9. ICC 

-.0233 

-.0230 

438.1 

3036. C 

16558. 6 

0.25CC 

6000. 0 

0.136 

-.0233 

-.0232 

-O.C 

3036.0 

16996. 6 

0.2500 

6000.0 

0.136 

-.0233 

-.0232 

-o.o 

0.0 

1 699 6,6 


STRINR 


390" .0 
3900.0 
3900.0 
962C .0 
9620. C 
962C.0 
1534C .0 
1534C .0 

15349.0 

21060.0 
21C60.0 
21060 .0 
26790 .C 

26780 .0 
26 780 .0 

32500.0 
3250C.0 
325 DC .0 
32500.0 
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oooo^oo 


(PER DEG. F> AlPHAI - 0.0000050 I PER OEG« FI OELTMP » -28". C ( DEG. FI 


INPUT OAT A 
ALPHAO • 0.0 

N ST6PL THICKO THICKI 


STROTR 


STRINR 


ETOTR 


ETINR 


0.3750 

0.3750 

0.7500 

0.7500 

0.7500 

0.7500 

****** 


0. 2640 
C .2200 
0.1763 
0. 1320 
0.0880 
0.04*9 
0.0 


0300 ********** 

0740 
11 RC 
1620 
2C60 ********** 

2500 
2500 


********** 

********** 

********** 


********** 

********** 


********** 

********** 

********** 

********** 


2112CCC.O 

1760000.0 
1 40 80 C 0.0 

1 056000.0 
7C4COO.O 
352CC0.0 

0.0 


483000.0 
11B49CC.C 
1888C00.C 
2592C0C • C 
3296C0C.C 
40030C3.C 
4003000.0 


AO (LBS) * 10730.1 

ALLOWABLE ADHESIVE SHEAR STRESS* TAUMAX <?*!»■ 60C0.0 

N ■ -1.0 N * ♦ l FDR TENSILE SHEAR ANO -l FOR COMPRESSIVE 
TEMPERATURE DIFFERENTIAL (DEG F| « -280. C 


ELASTIC ^01 NT ^STRENGTH* 


N STEPL 


0.3750 

0.375C 


THICKO 

THICKI 

TAU 

GAMMA 

DELTAO DELTAI 

0.2640 

0.0300 

6CC0.0 

0.1C0 

0.0 -.0005 

0.2200 

0.0740 

37?2.2 

0.C62 

-.0017 -.0023 

0.1760 

3.1180 

2797.0 

0.C47 

-.0033 -.0035 

0.1320 

0.1620 

223^.0 

0.037 

-.0064 -.0066 

0.0880 

0 • 2060 

2243.7 

0.037 

-.0093 -.0095 

0.0440 

0.2500 

2568.5 

C • 043 

-.0122 -.0124 

0.0 

0.2500 

56 Q 6 . 1 

0.095 

-.0147 -.0152 


TOUTER 


STROTR 


10730.1 ********** 

8497.8 ********** 

6711.8 ********** 

4925.8 ********** 
3385.5 ********** 
1913.1 ********** 

- 0.0 ********** 


TINNER 


0.0 
2232.4 
4C18.4 
5804.3 
7344.6 
8817. C 
10730.1 


ELASTIC-PLASTIC JOINT STRENGTH, PLOAO (LBS) « 30568.5 

ALLOWABLE ADHESIVE SHEAR STRAIN, GAMMAX • 

N ■ -1.0 N * * l FOR TENSILE SHEAR AND -1 FOR COMPRESSIVE 
TEMPERATURE DIFFERENTIAL (Or“ “““ ~ 

N STEPL THICKO THICKI 


1 

2 

3 

4 

5 

6 

7 

8 
9 

10 

11 

1? 

tt 

16 

17 

18 

19 


,3750 0. 
0 0. 
,0 0 . 
,3750 0. 
,0 0- 
, 3 0. 
,7500 0. 
,0 0 . 
,C 0< 
. C 520 0, 
,6980 0, 
► 0 0, 
.7476 0, 
,0024 0< 
,0 0, 
.0018 0, 
,6194 0 
,1288 0, 
,0 0, 


2640 
2640 
2640 
22 00 
2200 
2200 
1760 
1760 
1760 
1320 
1320 
132*? 
0880 
C 830 
0830 
0^40 
0440 
0440 
0 


G.03CO 
0.33CC 
0 • 0 3C0 
0.C74C 
0.07*0 

:. r 74 r 
0.1 1 80 
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